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1. ABSTRACT 


THIS ty TESTS THE RH70 IN THE PD peleee ; aed, 
yu Noh fcr KING _RH70 ee ee CONNECTE my 
EST. Tate meer i P TG FOUR RH70S CONNECTED 


sei * TS Noy TESTED BY This BROGRAR mete 15 USt0, THe 
REQUIREMENTS 


é.1 EQUIPMENT 


POP11/70 COMPUTER WITH CONSOLE TELETYPE, AND a D oy OF THE 
te PERERA Sh oF EORPLETE ARG” +503 RS RSO4,T 


FOR “Pane 
te RPO4,RSO3,RSC4 MUST HA "5 Be SCRATCH SACL ON I — 
THE TU MUST HAVE A SCRATCH 
2.2 STORAGE 


THIS PROGRAM HAS 16K WORDS OF MEMORY. 
2.3 PRELIMINARY PROGRAMS 


Ny 
ALL PDP11/70_ CPU DIAGNOSTICS MUST BE RUN ERROR FREE BEFORE by 
THIS DIAGNOSTIC IS RUN. 


LOADING PROCEDURE 
USE STANDARD LOADING PROCEDURES FOR .BIN TAPES. 


to 


4. STARTING PROCEDURE 
4.1 OPERATIONAL SWITCH SETTINGS 
SWITCH .? USE 
15 HALT ON ERROR 
14 LOOP _ON feat 
13 INHIBIT ERROR TYPEOUTS 
ll INHIBIT ITERATIONS 
10 BELL ON Po 
+ | LOOP ON ERROR 
8 LOOP ON TEST IN SWR<7:0> 


4.2 STARTING ADDRESS 


START AT ADDRESS 200 --- FOR Bata RH70. 

START AT ADDRESS 210 --- FOR NONST a RH7O. 
STARTING ADDRESS 210 SHOULD BE USED TO TEST 

RNY ONE RH INSTEAD OF ALL THE RH SIVEN BY 206 START 
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PROGRAM AND/OR OPERATOR ACTION 
Pionép MAKE SURE THAT THE MAGNETIC 


AGTAPE nust BE AT LOAD POINT. 
* HEADS MUST BE IN HOME POSITION. 


on Sees FROM 210 OPERATOR MUST CHOOSE BETWEEN THE RH70 PERIPHERALS 
AND ASE AODRESS OF ANY OR ALL OF THE PERIPHERALS 

CONNECTED. TQ THE RH7O. 

OPERATING PROCEDURE 

OPERATIONAL SWITCH SETTI 

SEE SECTION 4.1 


SUB-ROUTINE ABSTRACTS 


Sit 1 PR PE FERLY POS POS 


ERROR HALTS AND DESCRIPTION 


ON DETECTION OF AN ERROR THE PROGRAM WILL PRINT ALL RELEVENT | 
hg ~ THEN PROCEDE ACCORDING TO_THE SWITC 
GIy IF ALL SWITCHES BRE DOWN THE BRC aRa WILL CONTINUE. 
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THIS PROGRAM WAS ASSEMBLED USING THE POP-11 MAINOEC SYSMAC 
PACKAGE (MAINDEC~11-DZQAC-AY). 
MITT ee 


OPERATIONAL SWITCH SETTINGS a 
RHKERAR RAR ELAR EER ELEAF RARE ESR ALAE EERE ER ELAL EAE REEL EEE EEE ALES EE ES 


14 


SWITCH USE 
15 HALT ON ERROR 
‘ 14 LOOP ON TEST 
13 INHIBIT ERROR TYPEOUTS 
ll INHIBIT ITERATIONS 
10 BELL 
3 ‘LOOP ON ERROR 
8 LOOP ON TEST IN hl 
7? STOP FURTHER COMPARES IF SWO8 IS LOW 
6 TYPE ALL REG. WITH ERROR IF SW8 LOW 


KLAARLLALHLEL ALLEL RL RLLAA LERERE LALA RL ELE LALA ALELERAELALELALALTALE 


BASIC DEFINITIONS 
KKK ER AA EEE ER EEE E EERE RE EE EERE REAR EEE EA EAE EEE LEAL EEE EE EEE EERE 


29 INITIAL ADDRESS OF THE STACK POINTER *## 1000 24% — 
40 MISCELLANEOUS DEFINITIONS 

46 GENERAL PURPOSE REGISTER DEFINITIONS 

58 PRIORITY LEVEL DEFINITIONS 

68 “SWITCH REGISTER” SWITCH DEFINITIONS 


96 DATA BIT DEFINITIONS (BITOO TO BITIS) 
BASIC “CPU” TRAP VECTOR ADDRESSES 
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139 


146 


160 


199 












—_- 


RERKA KALA L LARA RA KERALA E LALLA AEA KEEL AR ERER ERE EERE SS RALL LASALLE ERE 


TRAP CATCHER 
HERRERA ER EEE EERIE EEE EEA E EEE EEE EE RE EEE EERE LEAL EERE ES 





142 ALL UNUSED aa FROM 4 = 776 CONTAIN A “.+2,HALT™ 
QUENCE TO CATCH ILLEGAL TRAPS AND INTERRUP 
LOCATION 0 cONTRINE O TO CATCH IMPROPERLY LOADED VECTORS 





RAK RHL EEK EERE E EERE AAA HAAR EA EE AEE EEE E EE EE EEE ELLE EE 
STARTING ADDRESS(ES) 
TePETiTittrertt titi ttt tttiiitiititttttttttittt ttt tttti titi treet) 





152 =—s STARTING ADDRESS 200 FOR NORMAL STARTS 


THIS WILL TEST ALL RPO4’S ON THE SYSTEM A SINGLE ORIVE AT A TIME 





STARTING ADDRESS 210 WILL TEST ONLY ONE SPECIFIED ORIVE 


STARTING ADDRESS aa WILL JUMP OVER THE TESTS REQUIRING AN OPERA 
AT THE DRIVE . 


ISHS EHH HEHE HEHEHE EEE 
MEMORY MANAGEMENT DEFINITIONS 
KHEHKAE KLE LEEK AE RAKE EE RARE REE HR ER EE EEE EAE REE R LAER AEA EERE RARE RE 











162 ——«KT11._- VECTOR ADDRESS 

166 «KL. STATUS REGISTER ADDRESSES 

173 “KERNEL “I" PAGE DESCRIPTOR REGISTERS 

184 KERNEL “I” PAGE ADDRESS REGISTERS 

JHE HB RHE HERR REHHHEE HEHEHE ee 


COMMON TAGS 
CHEE HHH HHH EHH GHOSE EH EHH GHEE HEHEHE EGE EE 


201 THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 


USED IN THE PROGRAM. 
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260 MAINDEC-11-DERHAB-A 

SPs JEU HE ESET HEE ee 

35 252 ERROR POINTER TABLE 

See ERRE RARER LRA RAKE REEL REEL EERE ERE SE LERRE EEL REREL ELELERERERLELE tS 

266 254 THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCU 

267 THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 

269 LOCATION SITEMB. THIS NUMBER INDICATES HICH ITEM IN THE TABLE I 

269 NOTE: IF SITEMB IS O THE ONLY PERTINENT DATA IS (SERRPC). 

70 NOTES: EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS 
é 

27 260 EM ssPOINTS TO THE ERROR NessAGE 

273 OH s3POINTS TO THE DATA HEADER 
74 oT ::POINTS TO THE DATA 

E75 OF :IPOINTS TO THE DATA FORMAT 

ee 259 JESSE SHEE HG 
f 

er SHSLLASLLALAFAAARAALER ALLL A LAA LALA SAA ALLL AAAS E SALAS LELE RAL ESES LE 

280 1587 REGISTER ADSRESSES 

cee REELS LAARL RA RALRLE ALFA HAALLE RELEASE LALLA ELL LAL L LLL SLA LALA ESEES 

283 LHASA ALERAAAAFSSRA LA LEAE LESSER KALA AAA ALARA RA RA AA LERL LEAL EREEES 

284 1834 REGISTER TEST 

353 HHRHLALERARAAA KALA REAL REARS SSELAALAAA AAA ALALALAAA LS LARELELESZAS EE 

287 1899 TEST 1 SIZE FOR RH DEVICES 

229 THIS TEST OETERMINS WHICH RH DEVICE Is ON THE Sysr. 

289 IF THE SYSTEM HAS MORE THAN ONE RH DEVICE THEN ONLY ONE 

230 | THE DEVICES WILL BE_USED HON THE FOLLOWING TESTS: 

291 : THE ONE THAT WILL BE USED IS THE FIRST ONE THAT IS PRESE 

292 IN THE FOLLOWING LIST 

293 RS 

294 RP 

295 T™ 

297 THE WAY THE TEST WORKS IS ‘AS FOLLOWS: - 

299 Q REFRENCE IS MADE TO THE CUNTROL AND STATUS REGISTER 1 

299 FOR THE RS BY A TST INSTRUCTION. IF IT RESPONDS THEN IT 

300 ASSUMED PRESENT AND THE LOCATIONS FOR THE I’0 REGISTERS 

201 FILLED WITH THE APPROPIATE ADDRESSES. 

02 THEN THE DRIVE TYPE REGISTER IS CHECKED TO HAVE GOOD 

304 IF THE TST INSTRUCTION TRAPS TO A NON EXISTANT VECTOR 

205 THEN A SIMILAR ATTEMPT IS MADE TO A RP CONTROL AND STATU 

306 REGISTER 1. 

307 THEN A TM IS TRYED. 

8 THEN A MIXED SYSTEM WITH MORE THAN ONE RH DEVICS IS TRYE 

310 2195 TEST 2 UNIT UNDER TEST 

311 p03 THIS TYPES THE UNIT TO BE TESTED : 

sie AND IS THE FIRST TEST AFTER THE END OF THE PROGRAM 
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315 230e 
318 
HE 2304 
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320 
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vest 3 BIT BANG RHCS! 


.TEST LOADING AND REPDING OF ALL POSSIBLE BITS 


THEN 
Bixee | TO AID. SCOPE SYNCS ON THE CLEAR 






TEST Heo] AEG ane READING OF ALL POSSIBLE BITS 


IN RH 
USE A PATTERN OF WALKING 1°S (1,2,4,10 ETC) 
BRD We KING O'S ( eine -SE 
IN THIS TEST SC!TRE'MCPE!DVAIBITLO!BITLO!RDY!GO BITS WIL 
AND RDOY!DVA BITS WILL ALWAYS BE SET 
LL AL BE CLEARED 
4 OR 9 OR 8 ARE SET FOR DEBUGGING 
THEN ABH dren AR (RHCS2 BIT #5) WILL BE 
GIVEN 70 AID SCOPE SYNCS ON THE CLEAR 











BIT BANG RHCS2 


TEST LOADING AND READING OF ALL POSSIBLE BITS 

IN RHCS2 REGISTER. 

USE A PATTERN OF WeLKING 1’S (1,2,4,10 ETC) 

AND WALKING O°S ¢ -5 ETC) 

IN THIS TEST 137548 ‘atts WILL NOT BE WRITTEN INTO 
AND IR BITS WILL ALWAYS BE SET 

IF SWITCH 14 OR 9 OR 8 ARE SET FOR DEBUGGING 
THEN A RH CLEAR (RHCS2 BIT #5) WILL BE 

GIVEN TO AID SCOPE SYNCS ON THE CLEAR 













BIT BANG RHCS3 


TEST LOADING AND READING OF ALL POSSISLE SITS 
IN ry: REGISTER. 
oe tel] Me en, OF WALKING 1°S (1,2,4,10 ETC) 


LKING -§ 
IN THIS uM 177660 ’aits Wibt NOT BE WRITTEN INTO 


AND 0 BITS WILL ALWAY 
AND iia ihe ee BITS WILL ALWAYS BE CLEARED 
IF SWITCH 14 OR 9 OR § ARE SET FOR DEBUGGING 
THEN A_RH CLEAR (RHCSe BIT #5) WILL BE 
GIVEN 70 AID SCOPE SYNCS ON THE CLEAR 










BIT BANG RHWC 






IN _RHWC 
oe tr R fiky- R Pec S (1,2,4,10 ETC) 
IN THIS, TEST 0 BITS ae BE WRITTEN INTO 


H OR 8 ARE SET FOR DEBUGGING 
A_RH CLEAR (RHCSe BIT #5) WILL BE 
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618 


2620 


2699 
2701 


2784 


2973 


IN _RHBA 


pen A PATTERN + WALKING 1°S (1,2,4,10 ETC) 


TEST 7 BIT BANG RHBA | 
TEST LOADING AND READING OF ALL POSSIBLE BITS 


AND WALKING 0’°S ¢ 


-2,~4,-0 & 
IN THIS ESTO Bits WIth NOT BE WRITTEN INTO 
AND BITOO ye WILL ALWAYS BE_CLEARED 


AND 0 BIT 
IF _ SWITCH 


THEN A_RH er 


YS BE SET 


a7 OR 8 


BIT BANG RHBAE 


TEST LOADING — OF ALL POSSIBLE BITS 
EAN OF Pye tee 1’ : (1,2,4,10 ETC) 


0 S ( 
1137700 ‘ait 
WILL ALWAYS 


IN RHBAE R 
USE A PATT 


GIVEN TO AID SCOPE SYNCS ON THE CLEAR 
SIGNAL. 


SILO Lys 1 (ONE WORD WRITE) 
AFTER A IS GIVEN (SET BIT #5 IN RHCS2) 
RUSE ts RCHECKED TO Byars! "IR" (BIT #6) HIGH 


TOGETHER W 
ONE, WORD 


CLEAR 


WITH 


H UNIT N 


APPROPIATE VALUES 


FTER A RH 


RUCEe IS CHECKED 
TOGETHER WITH UNIT ‘N 


EAR (RHCSe BIT #5) 
gre fe AID SCOPE SYNCS ON THE CLEAR 


. OF ALL ZEROS IS WRITTEN INTO RHDB 

ones (BIT #7) IS WAITED FOR BY_A TRAP INSTRUCTION 
NO TIMING IS DONE) 

H OR TS oREBON TE SET WITHIN “WAT” COUNT 
RHDB_IS READ AND CHECKED TO core ZEROS 


RHCSe WILL BE CHECKED TO HAVE ™ UNIT NUMBER 
RHCS1 Bucs RHBA,RHBAE,RHWC, WILL SE CHECKED TO HAVE 


TEST le aiL0 TEST 2 (ONE WORD WRITE) 
H CLEAR IS Ah gm (SET BIT #5 IN RHCS2) 
AY pe "IR" (BIT #6) HIGH 
oe. woe OF ALL ONES” IS WRITTEN INTO RHOB 
“OR” (BIT #7) IS were roe BY . TRAP nea} 
NC™ SET NETHIN “WAT” CO 


RTED 
RHDB IS READ AND CHECKED TO CONTAIN ALL ONES 












ARE SET FOR DEBUGGING 
WILL BE 








-5 ETC) 
Be Math NOT BE WRITTEN INTO 
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431 3144 
135 3146 


- 451 3416 
453 3418 


467 3808 
469 3810 
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TEST 13 SILO TEST 3 (TWO WORD WRITE) 


WITH UNIT NUMBER 
Tat pie A COUNT PATTERN 0 THRU 7 IS WRITTEN 


"OR" (BIT #7 IN ences 5° WAITED FOR BY A TRAP 
“OR" HIGH TOGETHER WITH THE UNIT NUMBER 
rite READ AND COMPARED TQ HAVE THE RIGHT VALUE 


IES 
THEN RHCS2, RHCS1, RHCS3, RHBA, RHBAE, RHWC ARE 
CHECKED TO'HAVE THE APPROPIATE’ VALUE 


SILO TEST 5 (FLOATING ONES) 


AFTER ARH CLEAR iF GIVEN (SET BIT #5 IN RHCS2) 
wae IS CHECKED T fe. “IR” (BIT #6) HIGH, 


ye 
oR (BIT #7 IN RHCS2) IS WAITED FOR BY A TRAP 
INSTRUCTION CALLED “WAT™ 


ERE 
THEN RHCSe IS CHECKED TO HAVE ” 





RHCS2 WILL BE CHECKED TO HAVE “IR” AND UNIT NUMBER 
RCSL RHCSS RHBA,RHBAE,RHWC, WILL BE CHECKED TO HAVE 
APPROPIATE VALUES 











AFTER A RH CLEAR IS GIVEN (SET BIT #5 IN RHCS2) 
RACES B CHECKED TO HAVE “IR” (BIT #6) HIGH, 
HER WITH UNIT NUMBER 
WORD = SeSeS IS WRITTEN INTO RHDB 
aoe IS CHECKED TO HAVE “IR™ AND UNIT NUMBER 
Opec, nae = 125eS IS WRITTEN INTO RHDB 

( 7 IN RHCS2) IS WAITED FOR BY A TRAP 
INSTRUCTION CALLED “WAT” 
RHDB_IS READ AND CHECKED TO CONTAIN SeSeS 
RHCS2 IS CHECKED TO HAVE “IR”, “OR” AND UNIT. NUMBER 
aie I 1° eco A SECOND TIME AND CHECKED TO 
RHCSe IS CHECKED TO HAVE “IR” AND UNIT NUMBER 
THEN ALL REGISTERS RHCS1, RHCS3, RHBA, RHBAE, RHWC 
ARE CHECKED TO HAVE APPROPIATE VALUE ’ 














SILO TEST 4 (COUNT PATTERN) 


ALS A RH CLEAR 15 GIVEN (SET BIT #5 IN RHCS2) 
RHCSe IS CHECKED TO HAVE “IR” (BIT #6) HIGH, TOGETHER 








pg al ION CALLED ™ 
THEN RHCS2_IS CHECKED TO HAVE 1h LOW AND 









TOGETHER W Na UNIT 
S a PATTERN: OF FLOATING ONES (1,2,4,10,20,40, 








N RHCS2 IS CHECKED TO HAVE “IR” LOW AND 
IGH TOGETHER WIT NIT NUMBER 
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TEST 16 SILO TEST & (FLOATING ONES IN UPPER BYTE) 


TEST 17 


TEST 20 


EIGHT he: A gl OF FLOATING ZEROS IN UPPER BYTE 








AND UNIT NUMBER 
THEN RHCS1, RHCS3, RHBA, RHBAE, RHWC ARE 
CHECKED TO’HAVE THE APPROPIATE VALUE 













AFTER A e? CLEAR IS GIVEN (SET SIT #5 IN RHCS2) 







HERS fe CH KED TO HAVE “IR” (BIT #6) HIGH, 
TOGETHER WITH UNIT NUMBER 
HT PATTERN OF FLOATING ONES IN UPPER BYTE 





EIGHT WORDS 
400, 1000, 2000, 4000, 10000, 20000, 40000, 100000 

IS WRITTEN INTO RHOB 

"OR" (BIT #7 IN RHCS2) IS WAITED FOR BY A TRAP 
INSTRUCTION CALLED “WAT” 

THEN RHCS2 IS CHECKED TO HAVE “IR™ LOW AND 
"OR" HIGH TOGETHER WITH THE UNIT NUMBER 
THEN RHDB IS READ AND COMPARED TO 4AVE THE 
RIGHT VALUE AFTER EACH OF. THE EIGHT READS. 
THEN RHcse IS CHECKED TO HAVE “IR" 

THEN RHCS1, RHCS3, RHBA, RHBAE, RHWC ARE 
CHECKED TO’HAVE THE APPROPIATE VALUE 


SILO TEST 7 (FLOATING O IN LOWER BYTE) 


AFTER A_RH CLEAR IS GIVEN (SET BIT #S IN RHCS2) 
1 ee “IR” (BIT #6) HIGH, 


IT 
EIGHT WOR S. OF FLOATING ZEROS 177776, 177775, 177773, 
7 177737, 177677, 177577 
IS WRITTEN | inte RHD 
. 7 IN RHCS2) IS WAITED FOR BY A TRAP 
INSTRUCTION CALLED "WaAT* 
N 21s¢ HAVE TR LOW AND 


CKED TO 
gn Ye: THE UNIT 
AND COMPARED TO Fa: THE 
TV ER EACH OF THE EIGHT READS. 
ano ipicse 18 C CHECKED TO HAVE “IR” 
THEN RHCS1, RHC es3 RHBA, RHBAE, RHWC ARE 
CHECKED TO’HAVE THE APPROPIATE’ VALUE 


SILO TEST 8 (FLOATING ZEROS IN UPPER SYTE) 


AFTER A RH CLEAR IS GIVEN (SET BIT #5 IN RHCS2) 
RHCS2 IS CHECKED TO HAVE “IR” (BIT #6) HIGH, 


Togs THER WITH UNIT NUMBER 





















75777, 173777, 167777, 187777, 137777, 


IT aN RHCSe) IS WAITED FOR BY A TRAP 
INSTRUCTION CALLED “WAT” 
THEN RHCS2 IS CHECKED TO HAVE “IR” LOW AND 


177872 
EN 
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SVCITUFIEN TE 
Piro 
“C2000 NOON —-O 


PPATEATERI EAT CASAL Tall 


ah.cncocococD 








Tren HIGH ie 6 ~Y. THE UNI 1 Ny 
RIGHT VELUE GPTER ERGM OF The El a ie 
ie gt CHECKED TO HAVE 


THEN aHCSL, EHGS2, BHBAE, RHWC ARE 
CHECKED TO’HAVE THE APPROP TAT VALUE 


RHCS1 - MCPE BIT #13 (PARITY LINE = 0) 


AN_RH CLEAR (SET BIT #5 IN RHCS2) IS GIVEN TO 
CLEAR ALL DEVICE REGISTERS 
TERN AREAL (ERROR REGISTER 1) IS CHECKED TO HAVE 


SET “PAT” (BIT #4 IN RHCS2) ae INVERT PARITY CHECKING 
READ ANY DEVICE REGISTER - 
READ AND CHECK RHCS! TO CONTE TH ee BIT #15) 
AND MCPE (BIT #1 
WRITE "1" INTO TRE (BIT #14 IN RHCS1) 
READ RHCS1 SC, MCPE, AND RDY SHOULD BE SET 
GIVE AN RH CLEAR (CLR - BIT #5 IN RHCS2) 
CHECK RHCS1 TO HAVE RDY 
CHECK RHCS2 TO HAVE ONLY IR AND UNIT NUMBER 
CH CHECK R HCS3, RHBA, RHBAE, RHWC TO HAVE APPROPIATE 
































RHCS1 - MCPE BIT #13 (PARITY LINE = 1) 
AN RH CLEAR eer #5 IN RHCS2) IS GIVEN TO CLEAR 










TAP 
SET “PAT” (RHCS2 BIT #4) THIS WILL INVERT THE PARITY CHE 
READ RHDA AND COMPARE TH HAS ONE IN IT 

THIS READING SHOULD SET SC NCPE IN RHCS1 

CHECK RHCS1 TO HAVE ONLY ROY 

CHECK -RHCSe, RHCS3, RBA, RHBAE. RHWC TO HAVE APPROPIATE 








TEST DUPLICATED Al& (RHCS1 BIT #8) 

CLEAR THE SUBSYSTEM ie A CONTROLLER CLEAR (RHCS2 BIT #5) 
MOVE 409 (ONE INTO 916) IN RHC 

READ RHCS1 TO CONTAIN 600 (BIT #8 AND RDY) 

READ RHBRE TO CONTAIN "1" (BIT #0 HIGH) 

MOVE e INTO_RHBAE cues [IN Q INTO RHBAE BIT #0) 

READ R TQ ¢ 


HBAE N 
READ RHCS! FO CONTAIN ONLY ROY (SIT #8 IN RHCS1 IS ZERO) 
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MRINDEC-11-DERHAB-A 
6079 


6081 


6199. - T 


$20i 


6319 
6321 


6415 
6417 


eee 8 ee 


TEST 24 TEST OUPLICATED Al7 ‘RHCS1 BIT #9) 






ae THE SUBSYSTEM SY 4 orate © LEAR ‘RHCS2 SIT #6) 
ba Ne 400 (ONE INTO Al7)_IN RHCS1 
RZAD RHCSi TO CONTAIN 1200 geet 89 AND RADY) 
READ RHBAE TO CONTAIN 5s ( #. HIGH) 


MOVE O INTO RHEE (WRITING QO INTO RHGAE SIT sl) 
READ RHSAE TO CONTAIN 2 
READ RHCS1 TO CONTAIN ONLY ROY (BIT #9 IN RHCS 


e- 


TEST DUPLICATED IE (RHCS1 BIT #6) 


CLEAR THE SUSSYSTEM BY A Be aL aes CLEAR (RHCS2 BIT 8S) 
MOVE 100 (ONE INTO IE) 1 

READ RHCS1 TO CONTAIN 2 (BIT #6 AND RDY) 

READ RHCS3 TO CONTAIN D0" (SIT 8& HIGH) 


MOVE O INTO RHCS3 (WRITING 0 INTO RHCS3 BIT sé 


READ RHCS3 TO CONTAIN 100 
READ RHCS1 TO CONTAIN ONLY ROY (BIT 86 IN RHCS! IS ZERO) 


RHCS1 PROGRAM ERROR (PGE BIT #10) 


C CLEAR. THE SUBSYSTEM BY A CONTROLLER CLEAR (RHCS2 SIT a5 
xT P FOR A 10 WORD WRITE 
ET “ao (RHCS1 BIT #0) TWICE IN TWO SUCCESSIVE 
INSTRUCTIONS 
THIS SHOULD SET, SC AND TRE IN RHCS! 
AND PGE SHOULD BE SET IN RHCS2 
RES eRe CHECK ED 
F HOR os ARE LARGE ENOUGH so THAT AFTER 
She Soret INSTRUCTION TO SET "GO" IN RHCS} " 
THERE 1S SUFFICIENT TIME 19 GIVE ANOTHER "BUS" inSTRUCTI 
© SET "GO" SEFORE THE FIRST "GO" HAS TIME TO COMPLETE 


RHCS2 - BUS ADDRESS INHISIT BIT #3 


CLEAR THE SUBSYSTEM BY A Albee ey CLEAR (RHCS2 BIT 86) 
SET UP FOR A 2 WORD WRITE FROM A BUFFER TAGGED “WREROM® 
ae BY BUS + eae Fucse "att 83 “BAt" 

HE ENO OF TE CHECK 


RHCS1 TO HAVE ONLY RDY AND COMMAND 
RHCS2 TO HAVE BAI 
RHCS3 TO HAVE 0 
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692 


7345 
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B47 MAINDEC=11-DERHAS-A 
5424 


TEST 30 


TEST 31 


TEST 32 


RHBA TO HAVE ADDRESS OF “WRFROM™ 


_ RHBAE AND RHWC TO HAVE ZEROS 


NOW SET UP READ FOR THE SAME DATA WITH 
} SET ie RE INTO A BUFFER TAGGED "REINTO™ 

AFTER READ CHECK 
RHCS1 K HAVE ‘iM ROY AND COMMAND 
RHC HAVE BAI 
RHC HAV 
te TO HAVE ae oe OF “REINTC™ 

E AND RHWC TO 


RHBA H S 
DATA IN REINTO BUFFER TS CHECKED sabi DATA IN 
WRFROM BUFFER ; 


RHSCe MOPE BIT #8 AND RHCS3 IPCKO BIT #0 

CLEAR THE SUBSYSTEM BY A CONTROLLER CLEAR (RHCS2 sit #5) 
SET IPCKO_(RHCS3 BIT #0) 

MOVE ALL ZEROS INTO RHOB o 


ET IN RHCS1 
READ RHOS ONCE THIS SHOULD SET MOPE (RHCS2 SIT #3) 
CHECK RHCSI FOR ROY (BIT #7), TRE (BIT #14), SC (BIT sis 
“CLR” ( RHCS2 BIT #5) IS GIVEN 
CHECK RHCS1, RHCS2, RHCS3, RHBA, RHBAE, RHWC 


RHSCe MOPE BIT #8 AND RHCS3 IPCKI git a 
CLEAR THE fees eo Pie CONTROLLER CLEAR (RHCS2 SIT #5) 


S 3 4 T 8 
MOVE ALL ZEROS INTO RHDB wr, 
HIS SH SET _TR 


RE SC IN RHCS1 
-READ RHDB ONCE THIS SHOULD SET _MDPE (RHCS2 BIT 88) 


CHECK RHCS1 FOR RDY (BIT #7), TRE (BIT #14), SC (BIT #is 
“CLR ( ae BIT #S) IS GIVEN 
ALL ERRORS ARE CLEARED 

CHECK RHCS1, RHCS2, RHCS3, RHBA, RHBAE, RHC 


EAs MOPE BIT #8 AND RHCS3 IPCKe BIT #2 
CLEAR THE ee a, A CONTROLLER CLEAR (RHCS2 BIT #5) 


CHECK’ AACS] FOR ROY (GIT 8 TRE T8It Sc TSIT als 
READ RHDB A SECOND TIME fret RHCS1, Reese’ RHCS3 


A 
; CHECK RHCS!, RHCS2, RHCS3, RHBA, RHBAE, RHWC 
TEST 33 





RHOCE MOPE BIT #8 AND RHCS3 IPCK3 BIT #3 
SEY TPCks SUBSYSTEM Ta) CONTROLLER CLEAR (RHCS2 SIT 85) 


cE 
SHOULD NOT SET TRE sc" tN RHCS1 
READ RHDB ONCE THIS SHOULD SET MOPE ‘RHCS2 SIT 89) 
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CHECK RHCS1 FOR ROY (BIT #7), TRE (BIT #14), (8IT #15 
Bethe" Cheicse°B1T as - often RHCS1, RHCS2, nics3 


ALL ERRORS ARE CLEARED 
CHECK RHCS1, CSE. RHCS3, 9HBA, RHBAE, RHWC 


TEST 34 RHCS2-WCE BIT #14 AND RHCS3-WCE OW SIT #12 


CLEAR THE ar, ad! a A CONTROLLER CLEAR (Rucse BIT #5) 
WRITE NINE WORD OF ALL NINES ON TO THE DEVICE 

SET UP TO DO we CHECK ON THAT WORD FROM AN 

QOD WORD BOUNDAR 

D0 A ONE WORD URITE CHECK WITH RHBA FROM AN 
on WORD BO 

THIS SHOULD SET WCE oH (RHCS3 BIT #12) 


ND e 

“CLR” (RHCS2 BI iS) IS GIVEN 

ALL ERRORS ARE CLEAR 

CHECK RHCS!, RHCS2, RHCS3, RHBA, RHBAE, RHWC 


TEST 35 RHCS2-WCE BIT #14 AND RHCS3-WCE OW BIT sie 


CLEAR THE SUBSYSTEM BY A CONTROLLER CLEAR (RHCS2 BIT #5) 
WRITE NINE WORD OF AL ON TO THE DEV is 

SET UP TO DO WRITE CHECK ON THAT WORD FROM AN 

QDD WORD BOUNDARY 

mae QNE WORD wats CHECK WITH RHSA FROM AN 


WORD 

pas SHOULD SET we ale (RHCS3 BIT #12) 
AND a MY (RHCS2 BIT #14) 

“CLR” (RHCS2 BIT 85) ‘6 GIVEN 

ALL ERRORS ARE CLEARED 

CHECK RHCS1, RHCS2, RHCS3, RHBA, RHBAE, RHWC 


_ TEST 36 RHCS2-WCE BIT #14 AND RHCS3-WCE EW BIT #11 


CLEAR bi a at BY A CONTROLLER CLEAR ‘RHCS2 SIT #5) 
WRITE NINE WORD OF ALL NINES ON TO THE DEVICE 
SET von TO 53 WRITE CHECK ON THAT WORD FROM AN 
EVEN WORD BOUNDARY 
DO _A ONE WORD nwt CHECK WITH RHSA FROM AN 
M4 WORD BOUN 

THIS SHOULD er RCE aft (RHCS3 BIT #11) 

AND , (RHCSe BIT #14) 
“CLR™ (RHCS2 BIT 15) "8 GIVEN 
ALL ERRORS ARE CLEAR 
CHECK RHCS1, RHCS2, RHCS3, RHBA, RHSAE, RHWC 


TEST 37 RHCS2-WCE BIT #14 AND RHCS3-WCE EW BIT #11 











oe ne ee 
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CLEAR THE SUS YSTEM oY a CONTROLLER CLEAR (RHCS2 SIT #5) 
WRITE NINE WORD OF ALL NINES ON TO THE DEVICE 
ET UP TO Ser ITE CHECK ON THAT WORD FROM AN 






Mie Se 
"CLR" (RHCS2 BIT is) 13 GIVEN 
ALL ERRORS ARE CLEARE 

CHECK RHCS1, RHCS2, RHCS3, RHSA, RHGAE, RHWC 


8581 TEST 40 TEST DBL ‘RHCS3 BIT #10) TEST A 
8583 CLEAR THE SUSSYSTEM BY A CONTROLLER CLEAR (RHCS2 BIT #5) 


8584 ae UP _FOR A NINE WORD WRITE FROM AN EVEN WORD BOUNDARY 
DO A NINE WORD WRITE FROM AN EVEN WORD BOUNDARY 
Ha SHOULD NOT SET RHCS3 BIT #10 OBL 
CHECK RCE, RHCS2, RHBA, RHBAE , RHWC 


8694 TEST 41 TEST DBL (RHCS3 BIT #10) TEST B 


8696 CLEAR THE SUBSYSTEM BY 8 Q CONTROLLER CLEAR (RHCS2 BIT #5) 
SET UP FOR A TEN WORD WRITE FROM AN EVEN WORD Bou UNDARY 

06 A TEN ORD WRITE FROM AN EVEN oR BOUNDARY 

THIS SHOU SET RHCS3 BIT #10 DBL h 
















CHECK 
CHECK RHCS1,RHCS2, RHBA, RHBAE , RHWC 


8808 TEST 42 TEST OBL (RHCS3 BIT #10) TEST C 






8810 CLEAR THE eke aS 4 fe Ronee CLEAR ‘RHCS2 SIT #5) 
T_UP_FOR A T WORD M AN OOO Nea WO: yOOUNORRY 
A TEN WORD FRIt ROM TAR at "UeRO 
THIS SHOULD NOT SET RHCS3 BIT #10 DBL 






CHECK 
HECK RHCS1,RHCS2, . , RHWC 
. EE | RHcey RHCS2, RHBA, RHBAE , R 
992! TEST 43 TEST DBL (RHCS3 BIT #10) TEST D t 
8923 CLEAR THE SUBSYSTEM BY A CONTROLLER CLEAR Reese err #5) 
SET UP FOR A ELEVEN WORD WRITE FROM AN EVEN WORD BOUNDAR 
DO A ELEVEN WORD WRITE FROM AN EVEN WORD BOUNDARY 
THIS SHOULD NOT SET RHCS3 BIT #10 DBL 


CHECK RHCS3 
CHECK RHCS1,RHCS2, RHBA, RHBAE , RHWC 








ee el 
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9034 


9036 


9153 
9155 


9268 
9270 


9381 
9383 


9495 
9497 


9502 
9608 








TEST 44 TEST DBL (RHCS3 BIT #10) TEST E 


TEST 45 


TEST 46 


TEST 47 


TEST SO 


TEST 51 


CLEAR THe “ACEH HO BY A TE PROP a CLEAR (RHCS2 BIT #5) 
UP FOR EN woe - FROM AN EVEN WORD BOUNDARY 
ae oa IN RHCS2 

DO_A TEN WORD WRITE TRO BN "even WORD BOUNDARY 

Hal iy SHOULD NOT SET RHCS3 BIT #10 DBL 

CHECK RHCET , RHCS2, RHBA, RHBAE , RHWC 


TEST DBL (RHCS3 BIT #10) TEST F 

CLEAR THE SUBSYSTEM BY A CONTROLLER CLEAR (RHCS2 BIT #5) 
SET UP FOR A ELEVEN WORD WRITE FROM AN ODD WORD BOUNDARY 
DO A ELEVEN WORD WRITE FROM AN ODD WORD BOUNDARY 

THIS SHOULD SET RHCS3 BIT #10 DBL 

CHECK RHCS 

CHECK RHCS1,RHCS2, RHBA, RHBAE , RHC 

TEST DBL (RHCS3 BIT #10) TEST G 


CLEAR THE tat BY A CONTROLLER CLEAR (RHCS2 BIT #5) 
ae UP af A NINE WORD READ FROM AN F ve ay BOUNDARY 


D 
THIS, SHO SHOULD NOT. SET RHCS3 BIT #10 DBL 
CHECK RHCST , RHCS2, RHBA, RHBAE , RHMC 


TEST OBL (RHCS3 BIT #10) TEST H 

CLEAR THE y ge BY A CONTROLLER CLEAR (RHCSe SIT #5) 
T ak TEN WORD READ FROM AN EVEN sete BOUNDARY 

DO_A TEN WORD READ FROM AN EVEN WORD BOUNDARY 

THIS, SHOULD SET RHCS3 BIT #10 DBL 

CHECK RHCS1,RHCS2, RHBA, RHBAE , RHWC 

TEST DBL (RHCS3 BIT #10) TEST I 

CLEAR THE SUBSYSTEM BY A CONTROLLER CLEAR (SHCS2 BIT #5) 

aa! P FOR A TEN WORD READ FROM AN ODD WORD Mee INDARY 

DOA TEN WORD READ FROM AN ODD WORD BOUNDAR 

THIS ne NOT SET RHCS3 BIT #10 OBL 

CHECK RHCS3 

CHECK RHCS1,RHCS2, RHBA, RHBAE , RHWC 


TEST OBL (RHCS3 BIT #10) TEST J 
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854 MAINDEC-11-DERHAB-A 

8sS 9610 5 at THE Wyte Evan So ceria name alee) 
Bee Bb ELEVEN WORD READ FROM AN EVEN ORD BOLADARY 

8s¢ HOULD NOT SET RHCS3 BIT #10 DBL 

859 CHECK ary HCS3 

ey enor CHECK RHCS1,RHCS2, RHBA, RHBAE , RHWC 







862 9721 TEST S2 TEST DBL (RHCS3 BIT #10) TEST K 








863 

864 9723 CLEAR THE SUBSYSTEM BY A coroner CLEAR (RHCS2 BIT #5) 
865 SET UP FOR A ELEVEN WORD READ FROM AN ODD ia BOUNDARY 
866 DO A ELEVEN WORD READ FROM AN ODD WORD BOUNDAR 

a4 Hey tees SET RHCS3 BIT #10 DBL 

869 CHECK RHCS1,RHCS2, RHBA, RHBAE , RHWC 






871 9835 TEST S3 TEST DBL (RHCS3 BIT #10) TEST L 






872 

87 yon 9837 CLEAR THE SUBSYSTEM BY A CONTROLLER CLEAR (RHCS2 BIT #5) 
874 SET UP FOR A TEN WORD READ FROM AN EVEN WORD BOUNDARY 
875 WITH BAI IN RHCSe BIT #3 SET 

876 DO A TEN WORD READ FROM AN EVEN WORD BOUNDARY 





87 ; tk sree NOT SET RHCS3 BIT #10 DBL 
879 ir CHECK RHCS1,RHCS2, RHBA, RHBAE , RHWC as 
881i 99sS TEST 54 TEST DBL (RHCS3 BIT #10) TEST M ‘, 















883 ou. 9957 aon THE SUBSYSTEM eS A CONTROLLER CLEAR (RHCS2 BIT #5) 
884 SET UP FOR A ONE WORD WRITE REVERSE FROM AN EVEN WORD 80 
88S DO A VONE WORD WRITE REVERSE FROM AN EVEN WORD BOUNDARY 
886 ys & SHOULD NOT SET RHCS3 BIT #10 DBL 






CHECK RHCSS 
888 ’ CHECK RHCS1,RHCS2, RHBA, RHBAE, RHWC 
‘ 10068 TEST SS TEST OBL (RHCS3 BIT #10) TEST N 
832 10070 CLEAR THE SUBSYSTEM 8 @ CONTROLLER CLEAR cRHCS BIT #5) 








893 cae UP FOR A TWO WORD WRITE REVERSE FROM AN EVEN WORD 80 
eo4 00 A TWO WORD WRITE REVERSE FROM AN EVEN WORD BOUNDARY 
53 aS i SHOULD NOT SET RHCS3 BIT #10 DEL 

ah CHECK RCS, RHCS2, RHBA, RHBRE, RHWC 






x, 10181 TEST S& TEST DBL (RHCS3 BIT #10) TEST 0 

901 10.93 CLEAR THE ye BY A CONTROLLER CLEAR (RHCS2 BIT #5) 
992 SET UP FOR A TWO WORD WRITE REVERSE FROM AN ODD\.WORD BOU 
903 DO A TWO WORD WRITE REVERSE FROM AN ODD WORD BYENDARY 
$04 THIS SHOULD SET RHCS3 BIT #10 DBL 

905 CHECK R 

906 CHECK RHCS1,RHCS2,RHBA, RHBAE , RHWC 
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10881 


TEST 64 


TEST $5 


TEST 66 


TEST 67 


TEST 70 


TEST DBL (RHCS3 BIT #10) TEST U 


gEF ip FoR°A TEN ORD READ REVERSE FROM AN ODD KORO BOLN 
DO_A TEN WORD READ REVERSE FROM Mw ODD WORD BOUNDARY 
THIS SHOULD SET RHCS3 BIT #10 D 


CHECK RHCS3 
CHECK RHCS1,RHCS2, RHBA, RHBAE , RHWC 
IF MAG. TAPE NOT USED. THIS TEST IS NOT DONE 


TEST DBL (RHCS3 BIT #10) TEST V 


CLEAR be yy tnt BY A CONTROLLER CLEAR (RHCS2 BIT #5) 
SET UP FOR A ELEVEN WORD READ REVERSE FROM AN EVEN WORD 

DO A ELEVEN WORD READ REVERSE FROM AN EVEN WORD BOUNDARY 
HS Mann SET RHCS3 BIT #10 DBL 


HECK RHC 
CHECK RHCS1,RHCS2, RHBA, RHBAE , RHWC 
IF MAG. TAPE NOT USED. THIS TEST IS NOT DONE 


TEST DBL (RHCS3 BIT #10) TEST W 


CLEAR THE SUBSYSTEM BY A CONTROLLER CLEAR (RHCS2 BIT #5? 
SET UP FOR A ELEVEN WORD READ REVERSE FROM AN ODD WORD 8 
DO A ELEVEN WORD READ REVERSE FROM AN ODD WORD BOUNDARY 


THIS SHOULD NOT SET RHCS3 BIT #10 DBL 
ECK RHCS3 


CHECK RHCS1,RHCS2, RHBA, RHBAE , RHWC 
IF MAG. TAPE NOT USED. THIS TEST IS NOT DONE 


TEST DBL (RHCS3 BIT #10) TEST x 


CLEAR THE SUBSYSTEM BY A CONTROLLER CLEAR (RHCS2 BIT #5) 
SET UP FOR A TEN WOR p READ REVERSE FROM AN ODD WORD BOUN 
WITH BAI IN RHCSe BIT #3 SET 

DO A TEN WORD READ hevease FROM AN ODD WORD BOUNDARY 
THIS, SHOULD NOT SET RHCS3 BIT #19 DBL 

CHECK RHCS1,RHCS2, RHBA, RHBAE. RHWC 

IF MAG. TAPE NOT USED. THIS TEST IS NOT DONE 


END_OF_ONE RH 

-THIS IS THE END OF TEST FOR ONE RH .- 

IF THERE ARE ay om Ms A PROGRAM 

JUMPS TO TEST 2 F 

END PASS IS REACHED ORLY AETER ALL RH ARE COMPLETE 
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i007 , detain in eae > 

1908 HRI EER RE EERE EERE EE EERE EERIE EEE EERE EE he 

l 11400 END Of PASS ROUTINE 

B18 2H 

1012 11402 yagi 2a THE PASS NUMBER ($PASS) 

1013 YPE “END PASS &XXXXX" (WHERE XXXXX IS A DECIMAL NUMBER) 

1014 If THERES A MONITOR GO TO IT 

at IF THERE ISN’T JUMP TO TSTe 

1017 sotto -aaaeeellaaaeeeeelelelbtniiietbbebebbdpieitiiiitiie 

1018 11439 SUBROUTINES 

Te BEAR EEE 
4 

1021 TLITtitiitittititititittititi Litt ititiiiiiititiittitititittits te! 

1022 _; 11655 . RS DATA TRANSFER SUBROUTINE 

ibs JE EE ETE 





1025 se 11657 THIS SUBROUTINE WRITES OR READS OR DOES A 









1026 : WRITE CHECK ON CYLINDER O TRACK O SECTOR O 

108? IT ASSUM ES THE RH REGISTERS ARE APPROPRIATELY 

1029 WHEN IT RETURNS FROM THIS SUBROUTINE TO THE 

1939 MAIN PROGRAM IT MEANS THE TRANSFER IS COMPLETE 

1032 THE CALL IS BY A JSR RO,ICOMND COMAND 

1034 * HEH EHR RAKE EEE REEL REEL REEL EER EARLE EEE EE EEE EEE > 
1035 11704 RPO4 DATA TRANSFER SUBROUTINE a 
iki PEPE OEEETEELEET EET ST EST ESETELE TESST EST TST TST ESTE SET ESTE TEES ETE Ts i 
1038 







11706 THIS SUBROUTINE WRITE/READ/WRITE CHECK ON THE RPO4 CYLIN 
1039 TRACK 0, SECTOR O. 









1040 

1041 11708 IT ASSUMES THE RH REGISTERS ARE APPROPRIATELY FILLED. 
1042 WHEN IT RETURNS FROM THIS SUBROUTINE TO THE MAIN 

1043 PROGRAM IT MEANS THE COMMAND IS COMPLETE 





THE CALL IS BY A JSR RO,ICOMND COMMAND. 
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MAINDEC-11-DERHAB-A 
KEK K ARR AAEE EEE EERE REE EE EER EEE EEE EERE EEE EEE EEE 


11758 TMO2 DATA TRANSFER SUBROUTINE 
HSER IESE HEHEHE HE RIE IEE SE REESE TEESE ER EIA SEE REE SE EE EE HE SE EE EE 


11760 THIS SUBROUTINE WRITES/REACS/WRITE CHECKS ON THE TMO2-TU 
ON THE FIRST BLOCK FROM BEGINNING OF TAPE (BOT) . 


11762 IT ASSUMES THE RH REGISTERS ARE Ber por a loieey FILLED. 
WHEN IT RETURNS FROM THIS SUBROUTINE TO THE 
MAIN PROGRAM IT MEANS THE COMMAND IS COMPLETE. 


THE CALL IS 
JSR RO, JCOMND 


11915 THIS ROUTINE WILL ALLOW THE CHANGE OF THE BASE 
ADDRESS FROM 176700 TO ANY TYPED VALUE 


LIGBO —«_- RR HH HAHAHAHA KKK AAK KALA KK HKS 


HXLEL LK HELE LEAKE ERE ERLE RLERE EERE REL ERLE REE REESE LER EEE LEELA RERELS 


SCOPE HANDLER ROUTINE 
SEA REE EEE 


11987 nas ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
AND nw! THE TEST NUMBER(STSTNM) INTO THE DISPLAY REG. (DISPLAY<7 
AND LOAD THE ERROR FLAG (SERFLG) INTO DISPLAY<15:08> 

THE SWITCH OPTIONS provitEn BY THIS ROUTINE ARE: 


OP _ON TES 
2 eT dns ITERATIONS 
SWOS8=1 LOOP ON FEST IN SWR<7:0> 


SCOPE ; ;SCOPE=I0T 


Perea t ite ateet Tigres 173 tbe 
U 


CONVERT BINARY TO DECIMAL AND TYPE 
HAKKAR ER EH EAA HEEL REEL EEE EERE EERE EE ER EER EERE RE EERE EEE EE EERE 


12053 THIS ROUTINE IS USED TO CHANGE A ey BINARY NUMBER TO A S-DIG 


SER DECIMAL (ASCII) NUMBER AND TYP . DEPENDING ON WHETHER 
GN WILL BE T 


SI 
BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS 
> ped WITH SPACES. 


MOV NUM, -(SP) ;;PUT_THE BINARY NUMBER ON THE S 
TYPOS ;;G0 TO THE ROUTINE 












02 
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1095 ' MAINDEC-11-DERHAB-A 
1096 KLKHKA LHL KAKA H HAE RHA LLL LALA KEKE RAS LEE KALLA KA ERE RAKERELALEELELE FEES 


97 12119 - TYPE ROUTINE 
38 KKK LHLKA KA LHLK KK A LRA ALEK LEAK KERALA KSLA KLE REA AAERERA RELL KA ELLESE 


l2l21 ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A O B 
THE ROUTINE WILL INSERT_A NUMBER OF NULL CHARACTERS AFTER A LINE 
**  NOTEL: $NULL CONTAI Q BE USED AS THE FILLER CH 
NOTE2: SFILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED 

NOTES: SFILLE CONTAINS THE CHARACTER TO FILL AFTER. 





fore 


a 
(et) 


CALL: 
1) USING A TRAP INSTRUCTION 
TYPE ’ 


MESADR ;;MESADR IS FIRST ADDRESS OF AN 
TYPE 
MESADR 
2) USING A JSR INSTRUCTION 
MOV PS,-(SP) ;;PUSH PROCESSOR STATUS WORD ON 
JSR PC, STYPE ;;CALL_TYPE ROUTINE 
MESADDR ;;PIRST ADRESS OF MESSAGE 


RELL LEK ALLELE LE RK LE RELL RE RELL EE ERLE RE REE REE LEE RE EERELE RE REE ERELE 


12192 TTY INPUT ROUTINE 
KEKE A EEK HK EERE HERE RAKE HEE EERE EAT RAKE EEE EEE AAA E EERE EEE EEE 


12201 TK INITIALIZE ROUTINE 
THIS ROUTINE WILL INITIALIZE THE TTY KEYBOARD INPUT QUEUE 
: Ne THE INTERRUPT VECTOR AND TURN ON THE KEYBOARD INTERRUPT 


JSR PC, STKINT 
RETURN 


12218 TK SERVICE ROUTINE 
THIS ROUTINE WILL SERVICE THE TTY KEYBOARD INTERRUPT 
H nt ane FROM THE INPUT BUFFER AND PUTTING 

IF THE CHARACTER IS A “CONTROL-C" (tC) STKINT IS CALLED AND 

UPON RETURN EXIT IS MADE TO THE “CONTROL-C” RESTART ADDRESS (OPE 


12245 iy ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 
" ROCHR ;;GET A CHARACTER FROM THE QUEUE 
RETURN HERE ;;CHARACTER IS ON THE STACK 
;;WITH PARITY BIT STRIPPED OFF 
12266 ee ROUTINE WILL INPUT A STRING FROM THE TTY 


;; INPUT A STRING FROM THE TTY 


REO VAS DON Lowe VOU Etro O DO Vee 


— bb 0 0 0 0 0 8 8 0 0 2 2 = 2 0 0 8 0 8 bo 0 9-2 2 8 §— 0 hb pb 0 9 po be pe 
££ EWWWIW 
Wr-OwWOnNMW 


0 be bs bn Bs = be es 8 = be 2 be Be he 2 hs 2 Bn be be be 2 pn be Be bs he ho fs fe fo 8 ps ho bo ho po pe 





= 
= = 









ROLIN ' 
1145 RETURN HERE ;;ADDRESS OF FIRST CHARACTER WIL 
tie ;; TERMINATOR WILL A BYTE r = 





: So & 
= Aah 
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HHAKLA KALA EERE REL K AA EKA AREER EE EER EERE EE ELER EERE ERELEELERELELE 


EAD AN OCTAL NUMBER FROM THE TTY 
HEKK RRR H EE HEE EE EERE EEE EEE EE HEE EEE EEE EEE EE EEE 


= bb pp 
yun ££ 
—-OwW0O oa 


THIS ROUTINE WILL_READ AN OCTAL (ASCII) NUMBER FROM THE TTY AND 
HANGE IT TO BINARY. 

THE INPUT CHARACTERS WILL BE CHECKED TO INSURED THEY ARE LEGAL 
CTAL DIGITS. IF AN ILLEGAL CHARACTER IS READ A "?" WILL BE T 


RDOCT ;;READ AN OCTAL NUMBER 
RETURN HERE ;;LOW ORDER BITS ARE ON TOP OF T 
;;HIGH ORDER BITS ARE IN SHIOCCT 


HELLHEKLE KKK LAER LALA RE LERE LEE EEE LE REELEERRELERLEE RR EERE ELAR EELERSE 


ERROR HANDLER ROUTINE 
HRA R AREA AEE EERE ERLE EERE RARER EERE EEE EEE EERE EE EE EERE EERE 


12389 ue A WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 


~ SINI*) olnte NPP OKO OK OWUIUIUIUTIUIUTIUT 


Ns 


ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR CALL 
AND GO TO SERRTYP ON ERRO 
THE SWITCH pp BY THIS ROUTINE ARE: 


* SWIS=1 HAL 

Hp CAN OCCUR BEFORE AND AFTER THE ERROR TYPEOU 
SW13=1 INHIBIT ERROR TYPEOUTS , 
SW1C=1 BELL ON ERROR 
hy LOOP ON ERROR 


ERROR N . ;;ERROR=EMT AND N=ERROR ITEM NUMBER 


HEL H EKA KEKE KAKA AAA E EE EEE E EERE EERE EEE EEE EER RRA E AERA EA EE REESE 
ERROR MESSAGE TYPEOUT ROUTINE 
RHEE EKA H AHA HH EERE EEE ERA AERA EEA AERA EEE EEE EEE EER ER EES RAKE EEE 


—-OwM Stet Wet atittet fetes OULWM-O0O NOU £UWIM-OWDO~ ITU) 


w0.00000 00 co coco co coco 





0 0 0 be 0 0 0 bb 0 + 0 8 0 0 2 8 0 bs 0 bb 8 8 = 8 8 9 bb bo bh pe pe 
0s 0 be bo be Be pe be ps be bs be 0 2 bs bs 2 fh hb bs he be he fe hms ne fo pe fo ho fo Fe hs bs po ho sh -0 fs he Bae pe 


000.000 
DORR e2S 


THIS ROUTINE USES THE “ITEM CONTROL BYTE" (SITEMB) TO DETERMINE | 
ERROR BE REPORTED. 


IT IS A ag a ie SERRTYP SUBROUTINE FROM SYSMAC. 


WITH OR CHANGES 
FIRST IF SWITCH 6 IS SET AND SWITCH 8 RESET THEN 
ALL REGISTER CONTENTS WILL BE TYPED BEFOR REPORTING THE ERROR . 


SECOND IF THE CURRENT ERROR HAS THE SAME ITEM NUMBER 
AS THE PREVICUS ERROR THEN ONLY THE DATA WILL BE TY°ED 
ANC NOT THE ERROR MESSAGE AND HEADER. 


RARHRA KAA AKA LALA RKA RAL LAA AREA KARL AAA AAR RAL R AREAL TRAE RLTRLAAAE 
HERE LHLARAAA RA LALA RARER RARER LE RL AA AAT RARER ARTEL AA APTA RERER ATER 
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1223 "MOV 
TYPOC 






























NUM, -(SP) 


1239 | 12726 =THIS TABLE CONTAINS THE ne ADDRESSES OF THE ROUTINES CALLE 
1240 BY THE “TRAP” INSTRUCTION 







1199 MATNOEC~11-DERHABOA | 

1200 EEE EEE EEE EEE EEE 
1201 12631 BINARY TO OCTAL ‘ASCII) AND TYPE on 
1202 EBB EEE EEE EERE EE 


1203 

1204 12633 “THIS ROUTINE IS USED TO et A 16-BIT BINARY NUMBER TO A S-DIG 
1205 OCTAL (ASCII) NUMBER AND T 

ie Oy i ita HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS 
1559 MOV NUM, -(SP) ;;NUMBER TO BE TYPED 

1209 TYPOS : sera FOR TYPEOUT 

1210 -BYTE N N=1 TO & FOR NUMBER OF D[GITS 
lell BYTE M He = OR 0 

lele ; L=TYPE LEADING ZEROS 
1512 : : ! OSSUPPRESS LEADING ZER 
1215 eehe on rbec HERE TO TYPE OUT WITH THE SAME cape ati opie AS THE 
eis EN OR $TYPOC 

1218 MOV NUM, -(SP) ;;NUMBER TO BE TYPED 

2219 TYPON ;;CALL FOR TYPEOUT 

1220 

1221 


aoe renter HERE FOR TYPEOUT OF A 16 BIT NUMBER 


;;NUMBER TO BE TYPED 
t:CALL FOR TYPEOUT 


. 1226 KXKEKKE AKA RA HELE EEE E ERLE EERE ERE EERE EERE EE EEE EEE EEE EE ERE EES 
lee? Ms 12703 TRAP DECODE 
He KEKAKEK EAA AH ERE EEE EERE EERE ERE RARER EEE EE EERE REE RE EERE REESE 
1230 12711 THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE “TRAP” INSTRUCTIO 
1231 AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADOR © 
le3e OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 
cae GO TO THAT ROUTINE. 


1235 TTT TTT ttt titi 
1236 12724 TRAP TABLE 
1237 KHER AKA K HEE RAE EEE ERE EE EAHA ERE EERE EAE EE ARES ERE RAE K EKER 













BO3 
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DERHAS. SRO 
i242 MRINDEC-11-DERHAB-A 
1243 PEESEREELEESEERESEEESEESSESELEFESSESEEESEESESSESSS ESE SESS ESEES ESSE 
1e45 12746 POWER DOWN AND UP ROUTINES 


35 
5 SESSEFSAELLESFS SLED SE SELES EASES EESESS ESE SES ESSE ES ESESSSALESSSSSSS 
5] 
} 
Ms LEME —«_- PHRASES ESES ESSE ESSE ESSE SLES ESSE SSS ASESELES EES SESESSSSS SASS 4E444 
HEEEASESEEFEESEDSESELEE SELES ES FESESSFEEESESSE EEE SSSESSLESSSF¢444S44 


= 


+b +0 

Fepteste 
ie oe © 
(0D 
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| 


- 
Lat) 
wo 
0 


0 +020 20+ b= 0+ 8 
LOLOGILILIGIED 

IOOOOOO 
PME on-O 
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» TITLE marnogc ii; a de “A 
; #COPYRIGH 75-1976 
:*DIGITAL EQUIPMENT CORP. 

3 BMAYNARD, MASS. 01754 


t STHIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC 
; #PACKAGE (MAINDEC-11-DZGAC-C1),MAR 24, 1976. 


: SBTTL OPERATIONAL SWITCH SETTINGS 


H 
te UP St he NS 
BELL 


PSOE ON ERROR 

_ [OOP ON TEST IN SWR«7:0> 

STOP FURTHER COMPARES IF swog IS LOW 
TYPE ALL REG. WITH ERROR IF SWS LOW 

‘Sart, asic DEFINITIONS 


AO Ba RDORESS | OF THE STACK POINTER ### 1000 #2# 


ve 7 WO ae Oe ee Oe oe Oe 


“EQUIV EMT, ERROR ;;BASIC DEFINITION OF ERROR CALL 
“EQUIV I0T. SCOPE ::BASIC DEFINITION OF SCOPE CALL 
: #MISC ELLANEOUS DEFINITIONS 
T= ;;CODE FOR HORIZONTAL TAB 
LF= 13 _ :3CODE FOR LINE FEED 
CR= 15 ;; CODE FOR CARR AGE RETU 
CRLF 20 ::CODE FOR CARRIAGE BET UEN-LINE FEED 
Es= 177776 tT BROFESSOR STATUS WORD 
“EQUIV PS. PSW 
STKLMT= 170774 +s STACK LIMIT REGISTER 
PIRG= 177772 ::PROGRAM INTERRUPT REQUEST REGISTER 
DSWwR= 177570 ::HARDWARE SWITCH REGISTER 
 DBISP= 177570 ::HARDWARE DISPLAY REGISTER 
,#GENERAL PURPOSE REGISTER DEFINITIONS 
_ ROz %0 ;;GENERAL REGISTER 
Ris %1 :: GENERAL REGISTER 
Re= %2 GENERA REGIST ER 
R3= %2 ST OENERAL REGISTER 
R4= “4 is eeee Reararen 
RS= “5 33GE REGISTER 
R&= “6 HGENEna REGISTER 
R7= “7 :GENERAL REGISTER 
-EGUIV R&.SP tt etacK POINTER 
“EQUIV R7,PC - PROGRAM COUNTER 
-*PRIORITY LEVEL DEFINITIONS 
Peo= » PRIORITY LEVEL 0 





atete 


-£ O10 (9.000 1 U1 Gf (9.009 ~43 


i 
1 
i 
i 
1 


GIGIGIGIGIGIGIGIOIG) 
0 b= 0-2 8 b+ 9-2 b= = bo p= 


furururures 


SSR PER toe 


ATATALAT AT AT AT AT AT RT ATT RT ATATAT ALATA AT 2 0--+ > 0-< &-< 9 -- p< b~< p< §- 0p ~~ H-< 
es 


0 b= 2 8 
CWIWIGIGI GIGI) 
a 


w 





BASIC DEFT 


100000 


00000} 
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BIT DEFINITIONS (8ITOO TO BIT15) 
100000 


PRi= 40 

PRO= 100 
PR3= 140 
PRY= 200 
PRS= 240 
PRE= 30 

PR7= 4 

W1S 10009 
SW14= 0000 
SWi3= 20000 
SWl2= 10000 
SWlii=s 4000 
SW1d= 2000 
SWO9= 1000 
SWwOs= 400 
SWwO7= 200 
SWOE= 100 
SWwOS= 40 

SWOY4¥= 20 
SWO3= 10 
SWOe= 4 

. SWOl= 2 

SwO0= 1 

-EQUIV SWO9,SW9S 
-EQUIV SWO8, 
-EQUIV SWO7,SW7 
-EQUIV SWO5, SWE 
-EQUIV SWOS,SWS 
-EQUIV SWO4, SWY 
EQUIV 3, Wo 
-EQUIV SWO0e,SWe 
-EQUIV SWO1,SWi 
-EQUIV SWOO,SWO 
:*DATA 
BITIS= 
BITI4¥= 40 
ic} 
5 
8 
B 
3 
g 
3 
2 
i 
B 
3) 
8 
2 
2 
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009174 
000176 


000200 
000046 
000052 
030210 


03 
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x RAP VECTOR ADDRESSES 
900004 ER if aE 3G F AND OTHER ERRORS 
000010 RESVEC= 10 : RESERVED AND ILLEGAL INSTRUCTIONS 
300914 TRITVEC=14 s3"7" BIT 
9001 TRIVEC= 14 TRACE TRAP 
909914 BPTVEC= 14 BREAKPOINT TRAP (PT) 
0 IOTVEC= 20 $$ INPUT/ OUTPUT TRAP (IOT) #*SCOPE** 
ate HAVE Se 5 EG ATOR TRAP (EMT) ##ERRORE* 
ak gO ae C=34 vik TRAP" TRAP 
050960 KVEC= 2: TTY KEYBOARD VECTOR 
o0084 TOVEC= 64 :: TTY PRINTER 





PIRQVEC=240 
-SBTTL TRAP CATCHER 


OR 
; ; PROGRAM INTERRUPT REQUEST VECTOR 






=0 
;*ALL UNUSED wit FROM 4 - 776 ek A *.+2,HALT” 
:*SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPT 

#LOCATION 9. CONTAINS 0 TO CATCH IMPROPERLY LOABED VECTORS 









000174 

000980 OISPREG: prio 0 ;;SOFTWARE DISPLAY REGISTER 

000080 SWREG: ORD O ;; SOFTWARE SWITCH REGISTER 
~SBTTL STARTING ADDRESS(ES) 

tide tg ocsSee JMP a QSBEGIN ;;JUMP TO STARTING ADDRESS OF PROGRAM 

037544 SENDAD 






=Se 
60000 









IMP BBEGIN2 ; JUMP SELECT TEST 
;*STARTING ADDRESS 200 FOR NORMAL STAR 

iaTHIS WILL TEST ALL RPO4'S ON THE SYSTEM @ SINGLE DRIVE AT A TIME 

; HSTARTING ADDRESS 210 WILL TEST ONLY ONE SPECIFIED DRIVE 

STARTING RODRESS 220 WILL JUMP OVER THE TESTS REQUIRING AN OPERATOR 
"SBTTL MEMORY MANAGEMENT DEFINITIONS 
VECTOR ADDRESS 

250 

STATUS REGISTER ADDRESSES 


177572 
177574 


000137 005532 















;#KTL1 
MMVEC= 
s*KT11 


SRO= 
SRi= 


000250 















177572 
177574 
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MEMORY MANAGEMENT DEFINITIONS 


172340 
172342 
172344 
172346 
153c0 
172352 
135369 
172356 


001110 


SRe= 
SR3= 


KTPDRI= 


KIPOR7= 


;#KERNEL “I” PAGE ADDRESS REGISTERS 


KIPAR7= 


4 " ceiaesesaea = 9 0 ta tem sacs eae ty tin apt 


G2-SEP-76 15:11 PAGE 33 


177576 


172516 
aR "I" PAGE DESCRIPTOR REGISTERS 


1730s 


172316 


172340 


172356 


FO3 
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.SBTTL COMMON TAGS 


5 RRAREEE RAE E EEK ERLE AREER ERLE EERE RAE E EERE EERE EERE EEE ELEL SESE 
: ATHIS TABLE ae VARIOUS COMMON STORAGE LOCATIONS 
;*USED IN THE PROGRAM 


- 
BPlCE0000000r-20000000 


> 0+ = b= b= b= 6 — b= b= b= bb + bb = 0 8-2 6-0 fb & - 9 bo ps po 9 
Lo] 
oO 
“>= 
ww 
ow 


NOTENAIFLV OVO LUT £VOTM EVOL VOT uO Lumoo 
iat) 


OOOOVOOKHO0000N0 V2O-MvMoO 


eer arrears 


1 
| 
1 
1 
1 
e 
e 
e 
e 
2 
e 
e 
e 
e 
e 


UU rar OO 
WG C£VMoOMN + 























r TART OF COMMON TAGS 
tt ONTAINS Bass COUN 


i ae He One T NUMBER 
at Rog FL TYERATION COUNT 


AINS TOTAL 
: CONTA NS Ly CONTROL BYT 
;;CONTAINS MAX. ERRORS PER TEST 
3 CONTAINS PC OF LAST ERROR  TRTRUCTION 
DATA 


sCONTAINS ADDRESS OF ; GOOD" 
$3 CONT AINS ADDRESS OF *BAD’ 
;CONTAINS 'GOOD’ DATA 
s;CONTAINS *BAD’ DATA 
: TRESERVED--NOT TO BE USED 
;;AUTOMATIC MODE INDICATOR 
: INTERRUPT MODE INDICATOR 
;;ADDRESS OF SWITCH REGISTER 
:IADDRESS OF DISPLAY REGISTER 
:iTTY KBD STATUS 
: ITY UFFER 


bitty PRINTER BUFFER REG. BODRESS 

CONTAINS NULL CHARACTER FOR FILLS 
{CONTAINS # OF FILLER CHARACTERS REQUIRED 
ssINSERT FILL CHARS. AFTER A “LINE FEED” 
s;°TERMINAL AVAILABLE” FLAG (BIT<O7>=0=ES) 
; CONTAINS THE ADDRE 

GH. CSREGO) Kes GBTAINED 

CONTR INS (($REGAD)+0) 
s CONTAINS ( ($REGAD) +2) 


tEONTA 
;CONTA NS ( ($REGAD)+6) 


un NS (($REGAD) +12) 
;;USER DEFINED 


3 FINED 
::MAX. NUMBER OF ITERATIONS 
ere ADDRESS 





> a 
pes. 
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1502 001224 000012 SLF: -ASCIZ <12> ;;LINE FEED 
1$03 pp RRRRRA RARER EERE REAR REA EE AIEEE EERE EEE EERIE ERE EEE EE EEE REA REESE 


se 
ar 


03 
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-SBTTL ERROR POINTER TABLE 
LS EEA" DM EDN. PRD G6 
is Ks thes SITEM Mas * R pls WHICH ITEM IN THE TaeLe 5.{5 PERTINENT. 


is Q THE ONLY PERTINENT DATA_IS ($ERRP 
tINOTED: ACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS: 


HEeoINTs 18 THE Bata winoen 


S ROINTS 10 THE DATA FORMAT 


SERRTB: 


NUT UT UU oat 
—-OvOO ITU Costu ope es 


fore 


¢ RRRRRAL EKA LL REL RELL LEEK EK AREAL RELL LEE RELE RELL EELS LE RERELERERLES 
; 


b—- bb -- B+ bb = = be b= p= bb 9 op 2 = pepe pe — 


stati 


; ITEM 1 
001226 046700 EM1 ; THE RH BASE ADDRESS _ 772040 
: INDICATING A RSOY OR RSO3 
:BUT THE DRIVE TYPE pIb NOT 
:CONTAIN 0,1,2,3 OR 
001230 065121 DH1 sPC 


RHDT 
001232 O86554 DT1 * SERRPC, SBODAT, 0 
001234 066736 DF 1 30 


; ITEM 2 
091226 o470S2 EM2 - sTHE RH BASE ADDRESS WAS 776700 
Ae Meee s INDICATING G AN RPOY, RPOS. OR RPO 
:BUT THE DRIVE TYPE:DID NOT 
‘CONTAIN 20020 24020, 20021, 24021, 
:20022, OR 24022 


001240 065121 ;PC 


;RHDT 
O0le4e O66554 ; SERRPC, SBDDAT,O 
091244 066736 head ;0 


1526 
1527 
1528 
1529 
1530 
1531 

S3e 


O0i246 0o47254 ‘ ; THE RH BASE ADDRESS Was 772440 
s INDICATING A TMO2. BUT T 
‘DRIVE TYPE DID NOT CONTAIN 

s 14010 INDICATING NO 


O01e50 O65le1 34? 


;RHDT 
001252 O&ESS4 : SERRPC , SBDDAT , 0 
001e54 066736 30,0 





03 


MAINDEC-11-DERHAB-A MACY11 27(732) 22-SEP-76 15:11 PAGE 37 
DERHAB. SRC ERROR POINTER TABLE 


1360 oo1esé 047410 EM4Y HIRBIcHT ENG nORe. TiN ORE 776300 


BUT THe DRIVE 
ype sis NOT CONTAIN 
:0,1,2,3,4, 20020, 24020, 20021 24021, 
:2b088" 24022, OR’ 1egid INCICATING NO 
RH DEVICE 15 PRESENT 
065121 i 


-" ;RHDT 
066554 ;SERRPC, SBDDAT ,O 
066736 :0,0 


047707 EMS ; THE UNIBUS TIMED OUT 
*FOR EACH OF THE FOLLOWING 
“ADDRESSES, INDICATING 
3NO RH ON THE SYSTEM 


Fs ABORT PROGRAM 


| STE ADDRESSES ON WHICH 
001272 o6Este !$ERRPC, RSCS1 , RPCS1, TMCS1, MIXCS1 
091274 O&6740 :0,0,0,0, 


001270 065130 


001276 os00se ' EMG AFTER AN RH CLEAR (BIT #5 
: iN BHCSe) RHCS= DOES. NOT 
:HAVE ONLY IR AND UNIT 


; 


001300 065204 :PC 
: TEST NO 

RHC Se GOOD 

001302 066576 : SERRPC, TSTNM, SGDDAT , SBDDAT 

001304 O68745 70,0,0,0 


001208 oso200 ' EM rea THE RH AND 


065247 DH? 


:RHDB_BAD 
066576 DTb : $ERRPC. TSTNM, SGDDAT, SBDDAT 
O6745 DFE ;0,0,0,0 


;ITEM 10 
050372 EM10 drat Ret THE nfo AND 


; BING 
:BACK, CAUSED RNCSE TO 
sHAVE WRONG DATA 
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;GIVEN IN BAD RHCS2 
001320 065204 DHE ; 


*RHCS2 BAD 
001322 o66576 DTb : SERRPC, TSTNM, SGDDAT, SBDDAT 
001324 066745 OFE :0,0,0,0 


; ITEM 11 
001326 OS0565 EM11 ;AFTER CLEARING THE RH AND 
; WRITING ONE WORD INTO 
DB AND READING IT 
BACK, CAUSED RHCS1 TO 
‘HAVE WRONG DATA 
sGIVEN IN BAD RHCS1 


STEST NUMBER 

;RHCS1 GOOD 

;RHCS1 BAD 
Obe576 Tp cK TSTNM, SGDDAT , SBDDAT 
674 F 


001330 065307 | DH1 I~ 


; ITEM le 
C5070 EMle HIRIT ING. SNe Ue ont RH AND 
ure 


N 
iGIVEN IN BAD RHCS3 


STEST_NU NUMBER 
:RHCS3 GOOD 


TRHCS3_ BAD 
001342 066576 DT ? SERRPC. TSTNM, SGDDAT , SBDDAT 
001344 Os6745 OFe _. 30,0,0,8 


1652 sITEM 13 
53 O01346 051153 EM13 sAETER CLEARING THE ft AND 


001340 DHI2 


'GIVEN IN BAD RHBA 


:PC 
TEST NUMBER 
iH BA GOOD 


RHBA BAD 
066576 DTb  SERRPC TSTNM, SGDDAT , SBDDAT 
066745 DFE :0,0,0,0 


sIvEn 14. 
051345 - EMILY s AFTER CLEARING THE RH AND 
f+ 3h. ONE WORD INTO 
sRHDB AND READING IT 
BACK, CAUSED wane TO. 
sHAVE WRONG DAT 


065413 . DH13 
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1872 :GIVEN IN BAD RHBAE 
1673 001360 065453 OH14 ;PC 

ie ie TN MBER 

1677 001362 066576 OTS -°  SERRPC TSTNM, SGDDAT , SBDDAT 
1 n: 001364 066745 OFE :0,0,0,0 

1680 ;ITEM 15 

1681 001366 951540 EMIS sAETER CLEARING. THE THE RH AND 









1684 “BACK, C 
1685 A s HAVE WRONG DATA 

1686 ;GIVEN IN BAD RHWC 

1687 001370 ogssis DHIS 

1688 TEST NUMBER 

1689 *RHWC GOOD 

teat 1372 06657 DT6 ie oe, $GDDAT , SBDDAT 
tea 1359 BPP ee DFE °0,0,0,0 

1693 

1694 ;ITEM 16 

195 091376 051722 EM16 sAFTER CLEARING THE RH AND 
1696 *WRITING ONE WORD INTO 








1697 *RH 
1698 ; CAUSED | RHCSB TO 

1699 HAVE WR 

1700 : GIVEN aA BAD RHCS2 ie 
170i OO1400 ofsS204 DH : PC 4 
1702 : TEST NUMBER 8] 
1703 *RHCS2 GOOD 

1704 RHCS2 BAD 

1705 001402 O66576 DT6 : SERRPC, TSTNM, SGDDAT, SBDDAT 

17068 OO1L404 O66745 DFE -0,0,0,0 








1709 001406 OSe1eS : EM17 ;AETER CLEARING THE RH AND 
1710 SWRITING TWO WORD INTO 
1711 AND READING IT 








17le BACK, CAUSED RHDB TO 
1713 HAVE WRONG DATA 

1714 ; GIVEN IN BAD RHOB 
1715 001410 065247 DH? 

1716 {TEST NUMBER 

1717 :RHDB GOOD 









171 *RHDB_ BAD 

1719 001412 066576 OTb : SERRPC, TSTNM, SGDDAT , SBDDAT 

1720 0014145 O66745 DF6 :0,0,0,0 

1722 ;ITEM 20 

1723 OO01416 052317 EM20 AFTER CLEARING THE RH AND 
WRITING TWO WORD INTO 








1736 : PBACK, CAUSED RHCS2 TO 
SHAVE’ WRONG DATA 
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ia IN BAD RHCS2 
: TEST NUMBER 

ay Rego BOG 

: + RHCeS BA 5 

g0142e Ob6576 : SERRPC, TSTNM, SGDDAT, SBDDAT 
1424 06674 -0,0,0,0 


001420 065204 


001426 952513 AFTER CLEARING THE RH AND 
_.  $WRITING TWO WORD INTO 
*RHDB AND READING IT 
BACK TWICE, CAUSED RHDB TO 
HAVE WRONG DATA 
; GIVEN IN BAD RHOB 


if ST NUMBER 
RHDB GOOD 


RHDB_BAD 
1432 oes 7s eae, TSTNM, SGDDAT, SBDDAT 
1434 ,0,0,0 


001430 065247 


; ITEM 22 
001436 052713 ; AFTER CLEARING THE a AND 
2 ;WRITING TWO WORD INT 
:RHDB AND READING aa 
BACK TWICE, CAUSED RHCS2 TO 
HAVE WRONG’ DATA 
; GIVEN IN BAD RHCS2 


TEST NUMBER 
sRHCSE GOOD 


HcS2 BAD 
001442 066576 DT6 + SERREC TSTNM, SGDDAT, SBDDAT 
O0:444 066745 OFE - 30,0,0,0 


; ITEM 23 
001446 053114 EMe3 ;AFTER CLEARING THE RH_AND 
:WRITING EIGHT WORD INTO 


;RHDB 

; CAUSED oy ¥ 
sHAVE WRONG DATA 
:GIVEN iN. BAD RHCS2 


ital NUMBER 
RHCS2 GOOD 


t* RHCS2 BAD 
001452 066576 ie sR TSTNM, SGDDAT , SBDDAT 
001454 OB6745 | :0,0,0,0 


001440 065204 DHS 


001450 O6S5204 


O01456 053211 ; emey 0, :THE BH. WAS CLEARED 


; I THE 
:"N" TH. TIME GAVE WRONG 
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001460 O&SS555 


001462 
001464 


002466 


001470 


00147e 
001474 


001Sle 
001514 
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066610 


066751 


953541 


065204 


066576 
066745 


053541 


066745 


053541 
065351 


066576 
066745 


053541 
065413 
066576 
066745 


053541 
065453 


OEES76 
O6E 745 
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DH24 


DT24 
DFe4 


; ITEM 25 
EM2S 


DHE 


DT6 
DF6 


;ITEM 26 


; ITEM 27 


sITEM 30 


; ITEM 31 


PAGE 41 


N_RHOB 
GIVEN IN “WORD NO” 


teoe 
TEST NO 
‘WORD NO 

:RHDB GOOD 

*RHDB_BAD 

: SERRPC, TSTNM, SILONM, SGDDAT , SBODAT 
:0,0,0,0,0 


ie RH WAS CLEARED AND 
:A PATTERN OF 8 WORDS WERE 
; INTO RHDB 


ING ALL 8 WORDS 
:FOLLWING REGISTER CONTAINED WRONG 
; VALUE 
; TEST NO 
sRHCSE GOOD 
RHCSe BAD 


'SERRPC. TSTNM, SGDDAT, SBDDAT 
:0,0,0,0 


ITEST NO 
IRHCS3 GOOD . - 


*RHCS3 BAD 
: SERRPC, TSTNM, SGDDAT, SBDDAT 
:0,0,0,0 


: TEST NO 

*RHBA GOOD 

:RHBA BAD 

:SERRPC, TSTNM, SGDDAT, SBDDAT 
:0,0,0,0 


;PC 
; TEST_NO 
; RHBAE GOOD 


;RH 
: SERREC, TSTNM, SGDDAT , SBODAT 


























04 


MAINOES=11-DERHAS-8 MACY1]1 @7(732) 22-SEP-76 15:11 PAGE: 42 





DERKRS. SAC ERROR POINTER TABLE 
1840 , 
is} sITEM 32 
1843 00:53 053541 EM25 
i943 SO1542 565515 D415 :PC 
1345 : TEST NO 
184s 
TS4é RHWC BAD 
1847 OO1S42 O&ESTE ‘; O76 SSERRPC, TSTNM, SGDDAT, SBDOAT 
gag SOIEHS SEEMS oFé :0,0,0,0 
ls 
i180 sITEM 33 
1851 01846 253770 EM33 :SETEING RH CLEAR BIT #5 
iSSe N RHCS2 CAUSED 
iss3 -ERROR REGISTER 1 TO HAVE 
1854 = SHRONG VALUE 
T855 oo1sSO0 oese2s DH32 
155 : TEST NO 
i957 :RHER} 6900 
95 
iEES OOss2 OSeS7E O07 sRHERL BAD TSTNM, SGDOAT , SBODAT 
1860 OO1554 dEe745 DFE 
i861 
ise SITEM 34 
1863 o01SS6 oS4104 EM34 :AN RH LCLEAR WAS GIVEN 
1865 “RHERI WAS CHECKED TO HAVE ZERO 
isés :PAT (BIT #4 RHCSe) WAS SET 
1866 :TO INVERT PARITY CHECKING 
ig? :RHER WAS READ BUT DID NOT 
s&s CONTAIN WHAT IS IN RHER! GOOD 
18ES OOLE8D oEStes DH33 Be 
1870 : TEST NO 
| 17! :RHERL GOOD 
1872 d :RHER] BAD 
| {1873 OCISS2 OBES7E DTS : SERRPC, TSTNM, SGDDAT, SBDDAT 
| 1gr3 SCISEY OBEMMS oFe 30,0,0,0 
| 137% sITEM 35 
| 877 OO1S6E oSH34E EM35 sRH CLEAR WAS GIVEN 
| 1878 :RHER] WAS CHECKED 
1875 :PAT (BIT #4 RHCS2) WAS SET 
7820 "AND RHERI WAS RE 
1851 ; *RHCS1 SHOULD HAVE RDY 
| jee $C AND MCPE SET 
| i883 Ao1s70 065307 DH11 :PC 
7885 TEST NO 
| Ses :RHCS1 GOOD 
| ese :RHCS! BAD 
| 4887 ools72e oSEs7e DTS : SERRPC, TSTNM, SGDDAT, S8ODAT 
! +558 081575 O6e74s OF :0,0,0.0 
| eso ITEM 36 
| 1ES2 OO1S7— OS4E44 :RH CLEAR WAS GIVEN 
| [BS RY Ri WAS CHECKED 
| te63 RHCS2-BIT #4) WAS SET 
| fess ie HER! WAS READ AND CHECKED 
| ress 21" WAS WRITTEN INTS “TRE -RHCS! 
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SESS 
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OO 
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ys 
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ow 
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8888 8888 
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065307 


O&&576 
066745 


oss0e1 


O65515 _ 


066576 


Oe6745 








22-SEP-76 15:11 PAGE 43 





+04 CHECKING RHCS1 
Ao hk. NOT CONTAIN SC,MCPE 





DHi1 





Teer wy NUMBER 
sRHCSL GOOD 












RHCS1 BaD 
OTS SSERRPC. TSTNM, SGDDAT, SBDDAT 
CFs ;0,0,0,0 

ITEM 37 
EN3? H_WAS CLEA 





‘Refi WHS CHECKED 
;PAT igh gt #4) WAS SET 


1 
eis WAS WRITTEN IN “TRE” RHCS1 
@N RH CLEAR WAS T 
; GIVE WHAT IS_IN “GOOD” 
;8UT GAVE WHAT IS IN “BAD” 












DKiL PC 
3 TEST NO 
*RHCS1 GOOD 
sRHCS1 BAD 
OTS 5 Ao ete SROONT , SEOOAT ‘ities 





; ITEM 40 
EM37 


sITEM 41 
EM37 


; ITEM “.. 









SRC 
132 








1954 
1956 
1338 


ini 


bs op 
ih 
0 


001679 


001672 
001674 


ae a at 


~* 


001876 


DOD tat date tes 


MAINOEC-11-DERHAS-A CY11 er 
DERHAB. ERROR PorNTER TLE 





1953 O01S6& O8S323 


065667 


O5£576 
066745 


OSS5561 


066745 


osssé! 
065453 
ObES7E 
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; ITEM 45 
EM4S 


TA 
:RHOR= Nec! 
DHS PC 
tTEST NO 
:RHOA GOOD 
?RHDA BAD 
OTE : SERRPC. TSTNM, SGDDAT, SBDDAT 
DFE :0,0,0,0 
s ITEM 46 
EME :AFTER AN RH CLEAR 
:"1" WAS WRITTEN IN THE 
iO TSK ADDRESS REGISTER (IN 
spat N RHCS ET 
N REPO Ne RADA (IN TAPE 
. Prati 
:REGISTER DID NOT CONTAIN 
P TIS IN "GOOD" 
DH1L : 
FC NO 
; *RHCS1 GOOD 
*RHCS1 BAD 
DT6 . :SERRPC, TSTNM, SGDDAT, SBDDAT 









PAGE 44 











;AFTER AN RH CLE 


adontss & eit tS a 


+3 § CALL ED FRAME _C 

N RHCS] WAS SET 
i READING a (IN TAPE 
DRIVES me? IT DID NOT 
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001744 066745 DFE 
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2010 ; ITEM S3 
20i1 O0174%6 055561 EM46 
20i2 001750 O&5515 DH1S 


aes ee i 

a OO17SE OS6062 eI sANL AHL CLEAR (RHCS2 BIT 46) 

2018 Bie. CRHCSI BIT #8) WAS SET 

: ep aGA oad 
SCONTAIN WHAT IS IN "GOOD" 


7 T 
2025 1764 066745 OFS 


20e7 ; ITEM S5 
EMS4 

se ' 
2033 ; ITEM 56 é 
2034 001776 OoS6e27 EMSE ;AN_RH CLEAR (RHCS2 BIT #5) 
2035 ; WAS GIVEN 
2036 3818 WAS WRITTEN IN RHCS1 
2037 ALL ZEROS WERE WRITTEN IN RHBAE 
2038 ;THE FOLLOWING REGISTER D 
2039 , ;NOT CONTAIN WHAT IS IN “GOOD” 


04 
e044 ; ITEM 57 











2050 SITEM 60 

2051 002016 oS653! EMEO ;AN_RH_ CLEAR (RHCS2 BIT #5) 
2052 SWAS GIVEN . 
2053 SAL? (RHCSi BIT #9) WAS SET 
2054 TON READING THE FOLLOWING 
2055 SREGISTER IT DID NOT 

2056 :CONTAIN WHAT IS IN "GOOD" 





e057 002020 065307 
2058 O0c02e 066576 
2059 002024 066745 


e062 O02e0e6 056531 
2063 00c030 CéS4S3 
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2064 002032 066576 O66 
2065 002034 066745 OFE 





2085 
2087 sITEM 62° 
oo2036 osE742 EMG2 sAN_RH CLEAR (RHCS2 BIT #5) 

; ia Wis BRITTEN IN RHCS1 
2071 WERE WRITTEN IN RHBAE ' 
e078 THE FOLLOWING REGISTER OID : 

; !NOT CONTAIN WHAT IS IN "GOOD" Pre at 
2074 902040 O&S4S3 DH14 


2078 ; ITEM 63 
; ME 


2084 sITEM 64 

eds 0020S 057177 EMGY :AN RH CLEAR (RHCS2 BIT 45) 

2087 STE CRHCS] BIT 46) WAS SET 
988 :0N READING THE FOLLOWING 
089 ZREGISTER IT DID NOT 

2090 :CONTAIN WHAT IS IN "GOOD" 








96 
97 
9 
90 
‘2101 ; ITEM &6 ; 
sits 002076 057177 EME4 NS GIVEN (RHCS2 BIT #5) 
e104 ALG WAS WRITTEN IN RHCS1 
2105 ALL ZEROS WERE WRITTEN IN RHBAE 
2106 :THE FOLLOWING REGISTER DID 
e107 5 $NOT CONTAIN WHAT IS IN "GOOD" 
ei08 002100 06535 DHle 
e10$ 002102 066576 OT6 
sith 002104 O6674S DF6 
elle ; ITEM 67 
eli3 0S71 EM64 
2114 O02110 065307 DH11 
e115 O0elle 066576 DT6 
stig 002114 O&674S DF6 
elle ; ITEM 70 
e1i9 O02116 057646 ;RH CLEAR WAS GIVEN 
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ERROR POINTER TABLE V4 
eee, / 
2120 ;THO SUCCESSIVE "GO" (RHCS1 BIT #0) a' 
2121 iH WAS GIVEN id THOUT GIVING 
5155 COPPLETE 
2124 EBLE LOWING REGISTER 
sie . GIOLROT. NOT CONTAIN WHAT IS 
127 002120 065307 DH11 
2128 O0elee 66576 OT6 
2129 O021e4 O66745 OFS 
2130 
e131 n ITEM 71 
132 002126 OS7B46 EM70 : 
2133 002130 965204 OH6 \. 
2134 O0cl32 066576 OTE \ 
2135 02134 O66745 - DFE 4] 
2136 
2137 ITEM 72 ’ 
2138. 002136 46 > 
2139 002140 085351 DH12 
2140 O0el42 066576 DTS 
2141 O0el44 066745 DFE 
5145 
2143 ITEM 73 
2144 002146 057646 .- “EM70 
2145 O021S0 OsS413 DH13 
2146 OO02152 066576 OTE 
2147 O02154 745 DF6 3 
314g 
3149 ITEM 74 
2150 02156 OS7E46 EM70 
2151 O02160 O6S4s2 DH14 ; 
2152 OOeib2 Ob6S76 DTé 
2153 OOci64 066745 DFE 
2154 
Biss SITEM 75 
2156 O02IbE OS7EYG EN7O 0) 
3157 002170 O65515 DHIS fey \ 
2158 O0e172 O66576 OT6 
2159 002174 O66745 OF6 
2160 
2161 ITEM 76 
Bl62 002176 osoi22 - EN7& ;RH CLEAR. WAS GIVEN A2 WORD 
2163 | WRITE WAS DONE F 
2164 SLOCATION TAGED Ron 
PIES ; T IT 
2166 WRITE 
2167 ; THE FOLLOWING REGISTER DID 
2168 NOT CONTAIN WHAT 15 
2169 SIN GOOD 
2170 002200 065307 DH11 
2171 O0eede Ob6576 O76 
2178 602204 O66745 OFS 
2174 ; ITEM 77 
2175 O02206 o60le2 EM76 










002210 


frurururururururururufrurunmirurururururururururoru 
Witcietal ht rtitetepitrbet tr Wt nt ited of. ie el 


fore 
tet =: 
5 


Purororerorurururare 


ae yt ee 
OnNMUIS rH oO 
o 
fw 
tw 
fo 


at] 
a 





a a= 


4 
066763 


060653 
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DHE 
DT 
DF& 
; ITEM 100 
M76 


; ITEM 101 
EM7& 


;ITEM 103 
EM76 
DH1S 
DT6 
DFE 


s ITEM 104 
EM104 


; ITEM 105 
EM104 


; ITEM 106 
EM106 





;RH CLEAR WAS GIVEN AN 
:IPCK BIT SHOWN IN “IPCK" WAS SET 
ZEROS WERE MOVED INTO RHDB 

:0N READING RH 

:THE FOLLOWING REGISTER 
DID NOT CONTAIN WHAT 


:IS IN GOO 
:PC, TEST NO, IPCK,RHCS3 GOOD,RHCS3 SAD 
; SERREC, TSTAM, IP, SGODAT, $SDDAT 


:PC,TST NO, IPCK,RHCS2 GOOD,RHCS2 BAD 
s SERREC, TSTNM, IP, SGDDAT, $SDORT 


;RH CLEAR WAS GIVEN AN 
;IPCK BIT SHOWN IN “IPCK” WAS SET 
;ZEROS WERE MOVED INTO 
sre FROM AN O00 WORD 


;RHD 
;AN RH CLEAR WAS GIVEN 


:T0 CLEAR aL ERRORS 
‘THE FOLLLOWING REGISTER 
:DID NOT CONTAIN WHAT 
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002362 
002364 


002366 


002370 
00237e 


002374 


065251 
066576 


066745 
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;ITEM 110 
M1 


; ITEM 116 








Be Fe TSTHM. Peck RHCS1 GOOD,RHCS1 BAD 








DH106 
DT106 : SERRPC, TSTNM, LP, SGDDAT, SBDDAT 
106 '0,0,0,0, 
s ITEM ian | 
DHIOS :PC, TSTNM, IPCK,RHCS2 GOOD,RHCS2 BAD 
OF 105 











1 
DH!11 :PC, TSTNM, IPCK,RHBA GCOD,RHBA BAD 
DTIO4 :SERRPC, TSTNM, [P, SGODAT, $8DDAT 

DF 104 Ao Ob.o 

EM106 

DH112 PC, TSTNM, IPCK,RHBAE GCOD,RHBAE BAD 
DT104 ;SERRPC, TSTNM, LP, SGDDAT, SBDDAT 

DF 104 :0,0,0,0, 0 







DH113 ;PC, TSTNM, IPCK,RHWC GOOD, RHWC EAD 





MI 
DT104 :SERRPC, TSTNM, LP, SGDDAT, $BDDAT 
OFIO4 —- $D50,0,8,0 






EM114 1 CLEAR WAS GIVEN AN 
o ae CHECK WAS DONE 
roy enaae REGISTER 
it T CONTAIN WHAT IS 
IN GOOD" 











DFE 
;ITEM 115 

EM114 ;RH CLEAR WAS GIVEN AN 
A WRITE CHECK WAS DONE . : 
; THE FOLLOWING REGISTER che J 
DID NOT CONTAIN WHAT IS 
sIN "GOOD" 

DHl2 

OT6 

DF6 
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ee 002376 061333 
e 


065307 
066576 
066745 
sITEM 117 
961313 EM116 
O65204 OH6 
066576 OTS 
O66745 DFE 
;ITEM 120 
~ EMI 
DT6 
DF6 


; ITEM lel 
11 


; ITEM 124 


O0e462e 066576 
002464 066745 


HWRTTE CHECK HAE DONE 


e ey 10 che Bh F880 FS 
T CONTAIN WHAT IS IN “GCOD” 


;ON A SILO TEST TO 
;TEST DBL RHCS3-BIT #19 
THE FOLLOWING REGISTER 
;DID_NOT CONTAIN WHAT 
31S IN “GOOD” . 
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244 ; ITEM 126 
e345 O0e476 061523 EM124 
e346 O02 065204 DH6 
e347 O0250e 066576 DT6 

2 O0eS04 066745 OF& 








; ITEM le? 






este ; ITEM 131 . 
2363 061523 EM124 
DH1S 







2368 002536 061666 EM132 ;BEFORE DATA TRANSFER 
5353 ; COMMAND WAS TO BE GIVEN 
3 THE RP DRIVE 

2371 :STATUS REGISTER DID NOT 
e372 3 :CONTAIN WHAT IS IN GOOD 







066303 ;PC 
; TEST NO. 
2376 ;RHDS1 GOOD 
2377 ;RHDS1 BAD 






2378 O02542 066576 pre 
e379 O0eS44 065745 
2380 ITEMI33 






2381 O02546 062044 EM133 ; BEFORE ee TRANSFER 







2382 5CON NANO WAS TO BE GIVEN 
2383 THE RS DRIV 

2384 :STATUS REGISTER DID NOT 
2385 ;CONTAIN WHAT IS IN GOOD 






2386 

2387 002550 066303 DH132 ;PC l 
2388 {TEST NO. fy) 
2389 sRHOS1 GOOD 

2390 ;RHOS! BAD 





2331 02552 066576 : OT6 
e332 O00e5S4 066745 







2393 ; ITEM 134 

2334 O02556 Ob2222 EM134 ;BEFORE DATA TRANSFER COMMAND 
e335 sWAS TO BE GIVEN 

2396 :MAG TAPE DRIVE STA 





TATUS 
2397 REGISTER DID NOT CONTAIN WHAT 
98 :1S IN GOOD 
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2400 O02S60 066303 DH132 
2401 O0eSbe 066576 DT 
002564 066745 





E135 HN QUESTION IS IN “BIT i HALTED FOR” 





supe O0eS6& Obe4le2 









2406 ee Stes IN QUESTION IN “REG AD 
paid 002570 066345 : DH135 :PC 

: TEST NO 
2409 " :PC_OF WAT 






2410 ior BIT 
rR 







e4ii EG ADDR 
2412 002572 066670 OT135 :SERRPC, TSTNM, WATIPC, WAITBT, WAITRE 
2413 002574 066775 DF 135 :0,0,0,0,0 

2414 ; ITEM136 

2415 002576 062612 EM136 ;WAS WATIING FOR A BIT TO RESET 

2416 *BIT IN QUESTION IS IN “BIT WAITED FOR™ 
2417 sREGISTER IN QUESTION IN “REG ADDR” 






2418 002600 O&6345 DH135 













3 Test NO. 
3 OF 
2421 
Dupe aE 00k 
e4e3 002602 66670 DT135 : SERRPC, TSTNM, WATIPC, WAITBT , WAITRE 
e424 002604 066775 DF 135 :0,0,0,0, 
e425 sITEM 137 
2426 002606 063014 EM137 ON WRITING AND READING 
2457 ‘THE REGISTER # IN "REG. ADDR” 
2458 ‘IT DID NOT CONTAIN 
24e9 | “EXPECTED VALUE. 
2430 002610 066425 DH137 P 
543] : TEST 
2432 :REG ADDR 
2433 GOOD DATA 
2434 BAD DATA 
2435 002612 068704 07137 : SERRPC, TSTNM, SBDADR, SGDDAT, SBDDAT 
ete 002614 o67002 DF137 :0,0,0,0,0 





2439 ; ITEM 140 
e440 O02616 063142 EM14O 









e445 002626 063374 EM141 sAFTER CLEARING THE RH AND 
S44E WRITING TWO WORD NTO 
D447 *RHDB AN 
E448 *BACK TWICE, PAUSED RHCS1 TO 
D449 ‘HAVE WRONG DATA 
5450 ?GIVEN IN BAD RHCS1 
2451 002630 065307 DH11 :PC 
Dyso ; TEST NUMBER 












S1 BAD 
e4SS 002632 066576 t SERRPC, TSTNM, SGDDAT , SBDDAT 
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SRC 
002634 


60 002636 


002640 


002642 
OCes44 


002646 
002650 
o026Se2 
002654 
002655 


002650 


002662 
002664 


002665 


002670 
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066745 


063575 


065351 


066576 
066745 


063776 


065413 


066576 
066745 


064176 


065453 


056576 
066745 


064377 


065515 
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DFG 


; ITEM 142 
EM14e2 


DHl2 


DT6 
DFG 


;ITEM 143 
EM143 


DH13 


DT& 
DF6 


;ITEM 144 
EM144 


DH14 


DT6 
OF& 


; ITEM 145 


EM14S 


DHS 


;0,0,0,0 


;AFTER CLEARING THE RH AND 
sWRITING TWO WORD INTO 


AND READING IT 
‘Race TWICE, CAUSED RHCS3 TO 
HAVE WR 

; GIVEN IN BAD RHCS3 


TEST NUMBER 
:RHCS3 GOOD 


*RH HCS3 BAD 
: SERRPC TSTNM, SGDDAT, $BDDAT 
:0,0,0,0 


;AFTER CLEARING THE RH AND 
iba Tite TWO Sih INTO 


: BACK TMICE, RAUSED RHBA TO 
?HAVE WRON 
; GIVEN IN BAD RHBA 


TEST ‘NUMBER 
:RHBA GOOD 


:RHBA BAD 
: SERRPC TSTNM, S$GDDAT , SBDDAT 
:0,0,0,0 


sAFTER CLEARING THE RH AND 
*WRITING TWO WORD INTO 

*RHDB AND READING IT 

: BACK TUICE, CAUSED RHBAE TO 
“HAVE Wd A 

; GIVEN AN "BaD RHBAE 


TEST NUMBER 
; RHBAE GOOD 


RHBAE BAD 
* SERRPC TSTNM, SGDDAT , SBDDAT 
:0,0,0,0 


;AFTER CLEARING THE RH AND 

‘WRITING TWO WORD INTO 
OB AND READING IT 

t BACK TUICE, CAUSED RHWC TO 

HAVE W ONG’ DATA 

; GIVEN AN BAD RHIC 
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2512 TEST NUMBER 
2513 GOOD 
2514 ‘ Ae BAD 
2515 O0e672 O&6576 DT&  SERRPC TSTNM, SGDDAT, SBDDAT 
2516 OO2E74 O6674S OF6. - $0,0,0,8 
2517 : ITEML46 
e518 002676 064577 EML46 0 DEVICE BASE ADDRESS DID NOT 
251 ME OUT BUT CORRESPONDING 
2520 + VECTOR ADDRESS DID TIME OUT 
bel 002700 966477 DH146 :P 
2523 . tVECTOR 

24 002702 o66720 DT14E : SERRPC, TESTDV, TESTVC, 0 
2525 002704 067007 DF 146 - $0,0,0 







002706 064771 EM147 3A DEVICE “aeae DID NOT 





S28 
2529 T_NO UNITS HAD 
2520 BoP E DR DRIVE TYPE 
2531 002710 066526 DH147 
2532 i ‘BASE ADDRESS 
2533 O0e7le 066730 DT147 :SERRPC, TESTDV 






2534 002714 067012 DF147 





nannegejs 
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eSSRSSSESSSSSSSRESSSSSLASESSASES SASS ELEFSSSSSASSSALALSASSSAF SASS 


Hs O REGISTERS 


Bcqus oo2716 o002S4 


;RP VECTOR AD0RESS 
sesepecenteorendvenenensenaceneesseseenecnesteeoonenesacensanes 

; :noR0 sae REGISTER 

T IS CALLED By ot ‘NUMBER 








COCCTUTUNUTUNTUNe 
oONaUwN 


rurovrururuturo 
sO.0 
(Ou 


me ee ee 


S REGISTER (RHBA? ‘ 
2 CRCLED BY BiT NUMBER 


- sCONTROL AND STATUS REGISTER 2 < 


v 
‘OATA LATE (BIT #15) 
sCONTROL AND STATUS REGISTER 3 (RHCS3) 


2 


sR ITE 

sDATA PARITY ERROR” EVER WOR 
:DATA PARITY ERROR O00 a 
“ADDRESS PARITY ERROR (BIT 


;DRTA BUFFER REGISTER (RHOS) 





tad cad tad ta a stad ade a ad a 


MATNDEC-11-DERHAB-A 
DE . 


RHAB. SAC 


rerureruraturaturaty 
at ata rr 


Hattattas 


tu 
Oe 
ows 


0 + 0-2 b+ 2-2 0b -0 2 be 
(2.000 JOU £ ture. 


if 


ERROR PO 


eHes 
BeBe 


S-Tue- 
Ooo 


ZROBGB8000 
BOBdoO0 
OH00008 
Hoo 


- 
Lo | 


810000 
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;EACH BIT IS CALLED BY BIT NUMBER 


s SLELAAAAESLEAALLLAFSRAASSRALESESSSSRALSLSLS LALLA LAL SLA ELSE ESL SSS 


tApoy REGISTERS 
Ss RREERAEEERSE ELE SERED EREREEEEEEEEAEEEER EERE EREEEEES EE SEES S £44544 


;CONTROL AND STATUS 1 REGISTER. (#00) 








G0= :G0_ (BIT #0) 
1-109 : ENTERRUET ENABLE (BIT 86) 
ROYs 20 READY (BIT 
Alg= 400 SRYGH ORDER UNIBUS BITS (BIT #2) 
al7= 1000 HIGH ORDER UNIBUS BITS (SIT #9) 
SEL= 2000 ;PORT SELECT (BIT #10) 
DVA= 4000 DEVICE AVAILABLE (S17 #11) 
PE= 20000 :MASSBUSS PARITY ERROR (BIT #13) 
TRE= 40000 TRANSFER ERROR (BIT 814) 
scs 100000 SPECIAL CONDITION (BIT #15) 
STATUS REGISTER (RHOSL) (#01) 
OFFS= 1 SDRIVE FORUARD 5" /SEC. (SIT #0) j 
B0T= é BEGINING OF TAPE (SIT s & 
OFF20= 2 BRIVe FORWARD 20" SEC. (BIT #1) 
O1c8= 4 :ORIVE TO INNER GAVRD SAND (BIT #2) 
GRV= 10 GO REVERSE (BIT #3) 
OLg#= 20 ‘DIFFERENCE LESS THAN 64 (BIT #4) 
DEi= 49 : DIFFERENCE FQUBLS 1 (BIT #5) 
We 100 VOLUME VALID (BIT #6) 
DRY= 200 DRIVE READY (BIT #7) 
DPR= 400 ;ORIVE PRESENT (BIT #8) 
PROG= 1000 ;PROGRAMABLE (BIT #9) 
LBT= * 2000 LAST SECTOR TRANSFERRED (BIT #10) 
WRi= © 4000 WRITE LOCK {BIT #11) 
MOL= 10000 MEDION ON-LINE (G21 8 th 
PIP= 2000 SPOSITIONING OPERATION IN PROGRESS (BIT #13) 
ERR= 40000 sCOMPOSTT ERROR. (BIT 914 
ATA= 100000 SATTENTION ACTIVE (BIT #15) 
“ERROR REGISTER #01 (RHER!) (#02) 
ifs |. SILLEGAL FUNCTION (BIT #0) 
ILRs. 2 ILLEGAL REGISTER (BIT 
RMR= Ye REGISTER MODIFICATION REFUSED (BIT #2) 
PaR= 10 ARITY ERROR (BIT #3) 
FER= 20 : i FORMAT ERROR (BIT 84) 
WCFs 40 . SWRITE CLOCK FAIL (SIT 85) 
ECH= 100 HARD ERROR (BIT #6) 
HCEs 200 THEADER CONPARE ERROR (BIT 87) 
HCRC= 400 HEADER CRC ERROR (BIT #9) 
ROE= 1000 ADDRESS OVERFLOW ERROR (BIT #9) 
IAE= 2000 SINVALTD ADDRESS ERROR (B17 810) 
WLE= 4000 WRITE LOCK ERROR (BIT #11) 
OTE=. 10000 SDRIVE TIMING ERROR (BIT #12) 
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2648 029990 OPI= 2U090 ; ; OPERATION cart ct al #13) 
2649 040900 UNS= 40000 sORIVE UN are ont yy) 
S58 100006 DCk= 100000 ;DATA CHECK ERROR (BIT 15) 
Fags ;MAINTAINABILITY REGISTER (RHMR) (#03) 
2654 000001 DMD= ;DIAGINOSTIC MODE (BIT #9) 
2655 pee MCLK= ; ; MAIN ATRABTLITY CLOCK BIT a1) 
ess MINX= 4 ;MAINTAINABILITY INDEX (BIT #2) 
spee sa MSTCK= 19 MaLTRINBILTTY sex 0n CLOCK (BIT #3) 
58 MRD= 0 MAINTAINABILITY READ (BIT #4) 
e659 MWR= 8 i MaINTAT weit ty WRITE (OLT 3) 
sery 51000 DTSY= 1000 ; AINTAINABILITY SYNC DETECTED (BIT 89) 
gpbs ATTENTION SUMMARY PSEUDO-REGISTER (RHAS) (#04) 
4 
esé4 000001 ATO= 1 ;DEVICE O (BIT #0) 
ects JOOOSe ATl= e ;DEVICE 1 (BIT #1) 
2666 O04 ATe= 4 ;DEVICE 2 (BIT #2) 
2667 010 AT3= 10 SEW IEE 3 (BIT #3) 
eb 0000eC ATY= 20 ;DEVICE 4 (BIT #4) 
e6&9 900040 ATS= 40 ;DEVICE S (BIT #5) 
e& 000100 ATE= 100 ;DEVICE & (BIT #6) 
= oco200 . AT7= 200 ;DEVICE 7 (BIT #7) 






2679 009093 extis sEXTEN 80 
2680 0009 3EX B) 


4 4 
esS4 100999 TRK2e0= 100000 STRACK TEL 
e636 ;ERROR REGISTER #2 (RHER2) (#10) 
2698 pons WCUs sWRITE CURRENT UNSAFE ( ; 














e703 000040 TOF= 40 (BIT #5) 
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DERHAB. SRC ERROR POINTER TABLE 


ne: eo ENP eor oe tet te 









2707 90199 4 MHS= LTIPLE HEAD SELECT (BIT #9) 
se Be Nes 200 iNOcueab st peCTTON cart aio) 
4 IxE= 400 : INDEX ERROR 
2710 010009 vU30= 10000 : 30V0LT UNSAF ofaIt. #12) 
geil bsog5 PLu= 20000 :PLO UNSAFE (BIT # 
gig 190900 acu= 100000 SACUNSAFE (BIT #18) 
ect OFFSET REGISTER (RHOF) (#11) 
ei 
2716 oo0001 OF25= 1 ; OFFSET 25 MICRO INCHES (BIT #0) 
e717 Oe OFSO= 2 : OF MICRO INCHES (BIT #1) 
2718 909004 OF100= 4 OFFSET 10 NECRO INCHES (BIT #2) 
2719 990010 OF200= 10 :OFFSET 200 MICRO INCHES (BIT #2) 
2720 900020 OF400= 20 :OFFSET 400 MICRO INCHES (BIT #4) 
27 OFa800= 40 :OFFSET 800 MICRO INCHES (BIT #5) 
ra 
2723 po0200 OFREV= 200 sOFFSET NEGATIVE (REVERSE ) (BIT #5) 
e724 oo2600 HCI= 2000 ‘HEADER COMPARE INHIBIT (BIT #10) 
725 004000 ECT= 4000 “ERROR CORRECTION CODE INHIBIT (BIT #11) 
2726 o1os02 FMT22= 10000 :FORMAT BIT (BIT #le 









730 000001 Sl= 1 ;SLAVE NUMBER 

73i 090002 Se= 4 ;SLAVE NUMBER . 
e732 000004 S4= 4 SLAVE NUMBER 
2733 0000910 EPAR= 10 sEVEN PARITY . 





001400 1 ;800 8PI 
e742 000300 NML= 308 ;NORMAL - 2 FRAMES PER WORD 






2748 ;DRIVE TYPE REGISTER 


e750 002009 SLYPR= 2000 ; SLAVE PRESENT (BIT #10) 
e75i 010000 CH7= 10000 :CHANNEL 7 (BIT #12) 






5525 
5555 SDESIRED CYLINDER ADDRESS (RHCA) (#12) 
576y tEACH BIT IS CALLED BY BIT NUMBER, 








;CURRENT CYLINDER ADDRESS (RHCC) (813) 
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e756 ;EACH IS CALLED BY BIT NUMBER 












eri sERROR REGISTER #03 (RHER3) (#15) 
e773 p00001 Psy= 
2774 g00002 = 8 
000016 uWR= 10 
2776 g00920 PRE= 20 
2777 g00040 ACL= 
2778 p0010° D¢L= 100 
2779 040000 SkI= 40000 
790 190008 OcyL= 100000 













sas : EACH BIT IS CALLED BY BIT NUMBER 





$f RERARELLEL REE LE LARTER RALE LE LEAL LEE L ELA LERA RELA REL ELE LELLERTTELE 






2750 TEACH BIT _IS CALLED BY BIT NUMBER 


2765 F ;SERIAL NUMBER REGISTER (RHSN) (#14) 


;PACK SPEED NOOFE Aah, #0) 


j VELOC TY uN? 
ANY UNSAFE EXCEPT READ SURITE (BIT #3) 
:DISK nee ROTBTION ERROR (BIT #4) 
3AC LOW (Ht -¢ 
;0C tow 
; SEEK Incone. Te (BIT #14) 
OFF CYLINDER (BIT #15) 


2783 
2784 ;ECC POSITION REGISTER (RHEC1) (#16) 
2785 ;EACH BIT IS CALLED BY BIT NUMBER 


2730 ;ECC PATTERN REGISTER (RHEC2) (#17) 











Boccia sane saat noe 


Hatta 
ave 
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ERROR POINTER TABLE 
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DERHAS 


2738 
795 
280] 


Ml ee OO CMO 


O£MOM crm 


Grr 
oO 


:TAPE CONTROL 
;DESIRED CYLINDER 
; CURRENT ‘CYLINDER 


0 2 : BUFFER 
SSTARTING ADDRESS 


;RS ALONG 
;RP ALONE 
TMCS1: — 172440 ;TM ALONE 
MIXCS1: 176300 ;MIXED SYSTEM 
PRESENT: 


LSBTTL REGISTER ADDRESSES 








;CONTROL STATUS 1 

sW COUNT 

i PeaME COUN 

. OUN 

sDESIRED SECTOR/TRACK 


iRive Status” 


sERROR 1 

sATTENTION SUMMERY 
:DATA BUFFER 
:MAINTENANCE REGISTER 
‘DRIVE TYPE 


;SERIAL NUMBER 
: OFFSET 














ee oak ere 


RHAB. SRC 


004060 


eeS3e93 
INSP EET 


esegeg 
Ntetudtiistawet tt tat ab totat= fai 


zee 
8 


2333 


3 
& 2b +b = >= b= b= b= b= 0 om = be 


004 
004 
004 
004 
094 
004 
004 


oO 
Oo 
£ 
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REGISTER ADDRESSES 


000000 
000002 
000006 


000010 
000012 





OS 
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: THE FOLLOWING ARE THE 1/0 REGISTERS FOR THE DEVICE UNDER T 

: THEY WILL BE FILLED WITH ADDRESSES DEPENDING ON WHAT DEVICE Is ON 

Wrage: CASE OF A MIXED SYSTEM THAT IS WITH MORE THAN ONE RH DEVICE 
: THE FIRST ONE THAT EXISTS IN THE FOLLOWING LIST WILL BE PICKED 

sAND THE OTHERS WILL NOT BE USED. 

:1) RSO3 

:2) RSO4 

:3) RPOY,S,6 

nt TMO2” 


s17es F 
THE REST OF THE LOCATIONS WILL BE FILLED BY THE PROGRAM 
bucsi: 0 sCONTROL AND STATUS 1 
RHC: 9 sWORD COUNT 
RHBA: 0 *BUS ADDRESS 
RHFC: ;FRAME COUNT 
RHDA: :DISK ADDRESS 
RHDST: O : DESIRED SECTOR/ TRACK ADDRESS 
RHCS2: 0 TROL AND STATUS 2 
RHDSI: 0 s DRIVE status 
RHERI: 0 ERR 
RHAS: © ATTENTION SUMMARY 
RHCC: ?CHECK CHARACTER 
RHLA: 0 LOOK= 
RHDOB: 0 A BUFFER 
RHMR: OQ smarwrarieeiLrty 
RHOT: ;DRIVE T 
RHSN: 0 SERIAL NUIGER 
RHIC: , ; TAPE CONTROL 
HCA: QO ESTED CYLINDER ADDRESS 
RHCCA: 0 CURRENT CYLINDER RODRESS 
HER2: 0 ERROR #2 
RHERS: O ‘ERROR #3 
“ RHECL: 0 ZECC POSITION 
RHECe: 0 ECC PATTERN 
RHBAE: 0 ;BUS ADDRESS EXTENSION 
RHCS3: 0 sCONTROL AND STATUS 3 


;FUNCTION EQUATES 


RELEAS: 


; TABLE OF FUNCTIONS FOR RHCS1 THEN "GO" BIT HAS TO BE SET 


0 we OPERATION 

e NLOAD fe BY) 

6 SRECALTBRA TE 

10 ;DRIVE CLEAR 

le sRELEASE (DUAL-PORT OPERATION) 





z 
: 


ramaney § 
sgesssessssess 3: 


Bub 
Bo 


H 
Writer 


BUH A 
WONMWUIL£CWrUr-O 


pial 


it 






b= b= bb -= » — b= 6 bb bp 


STOR ata at Gs os 


agg 
zZ 


004652 
OO46S4 


004674 
004677 
004702 
004704 


004706 
004710 


MACY11 27(732) 
REGISTER ADDRESSES 


-DERHAB-A 
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UR 29 ie 1E ae HEADER AND DATA 
HIRTPOR: pS ie Ba HEADER AND DATA (FORMAT) 
READAT: 70 sRE TA 
REFOR: 7e sREAD HEADER AND DATA 
Seeger iy $e aes MMAND 
RETCL 16 HRETORNTO CENTERLINE 
PKACK: ee ;PACK ACKNOWLEDGE 
ADIN: 20 ;REA 
REWIND: § ;REW 
REVRED: 76 ; REVERSE READ 
SPACFD: 30 ;SPACE FORWARD 
REVWRT: 66 sREVERSE WRITE 
ILLEGL: .WORD 0 ;COMPUTED ILLEGAL FUNCTION 
fee BUFFER FOR READ WRITE 
WRFROM: °BLKW . 70. ;WRITE 4m Ml BUFFER 
REINTO: “BCKW 70. ‘READ INTO THIS BUF 
COMND: Q ; STORE CONAND FOR COMMAND ROUTINE 
COMAND: 0 sSTORE COMMACD 
NOGO: Q STF ZERO GO IS TO BE GIVEN IN COMMAND. ROUTINE 
:IF ONES GO IS NOT TO BE GIVEN IN COMMAND ROUTINE 
;USED IN PGE TEST 
WATO: 0 iI ZERO WAIT FOR BIT TO SET 


Teo he Watt FOR. FOR BIT TO RESET 


US 
WRTBIT: O - ;BITS NOT WRITTEN. INTO 
SETBIT: O ;BITS ALWAYS SET 
CLRBIT: 0 ;BITS ALWAYS CLEARED 





*RESERVED LOCATIONS 
TSTNM: 0 s TEST NUMBER 


SLAVE: 0 EEP SLAVE NO. 
IP: 0 : IPCK NUMBER FOR ERROR PRINTOUT 

SILONM: 0 iS1LO WORD NUMBER FOR ERROR PRINT OUT 

WAITPC: 0 :WAIT TRAP PC 

WAITRE: 0 :WAITING FOR REGISTER ADDRESS IN WAIT TRAP 
WAITBT: O :WAITING FOR BIT IN WAIT TRAP 





: TABLE FOR ATTENTION BITS 
“ATTENTION TABLE 
ATABLE: NTE 1,2,4,10,20,40, 100,200 


RESERVED LOCATIONS FOR ut SELECT 
BASEAD: 172040 RS BASE ADDRESS 
BASPAD: 176700 :RP BASE ADDRESS 
BASTAD: 172440 ;TU BASE ADDRESS 
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354 004712 176300 -.  BRSEMAD: 176300 ;MIXED SYSTEM BASE ADDRESS 
= 004714 ' - BASEVC: O RS VECTOR. 
2958 00471 rane BASP: 254 VECTOR 
959 bo47 5001 past: 1 TU vectin” 
es0 7, Sid BASM: 2 *MIXED VECTOR 
- TABLE FOR GIVEN. BASE ADDRESSES 
5303 004724 900010 BSGIVA: .BLK 






2965 : - TABLE FOR GIVEN VECTOR 
367 004744 900010 BSGIVV: .BLKW 8. 






2970 004764 000004 NMRHS: 4 ;NUMBER OF RH 
2971 904766 000000 BASINX: 0 : INDEX FOR BASE 
2972 004770 000000 WORKBS: 0 s WORKING BASE 

73 77e eed WORKNM: 8 ;WORKING NUMBER ate o 

74 774 0000 WORKVC: ;WORKING VECTOR FOR Ri 
2975 004776 000000 FORBAE: 0 ; TOTAL NO. of ons FOR ope CALCULATION 

0000 0 LOOP COUNT FOR 200 STAR 

e377 00500e 0000 LOPCT1: O stoop COUNT FOR 210 aTART : : 
2978 005004 0000 USEVEC: 0 ;USE VECTOR : 

















poso0& ooo000 GIVE: 0 :IF ONES OPERATOR WILL GIVE ADDRESSS 
2983 005019 900000 UNIT: 0 - UN 
2984 005012 o00000 ST200: O sALL ONES INDICATE STARTING FROM 200 
2985 “TESTING TABLE 
2386 o05014 000010 TSRHNO: .BLKW 8. ;RH NO TO BE TESTED IN ORDER OF TEST v 
2988 005034 000010 TSDEVICE: -BLKW 8. sDEVICE TO BE TESTED IN ORDER OF TEST 
2989 1=RS03,3/L,3/LA 2=RSO4 =RPO4,5.6 SINGLE PORT 
2990 S TosRPOd S, 3 DUAL PORT soctuag 
se 
2333 posos4 ooo010 TSUNIT: .BLKW 8. ;UNIT NO. TO BE TESTED IN ORDER OF TEST 
2995 
3 005074 000910 TSSLAV: .BLKW 8. ;SLAVE NO TO BE TESTED IN ORDER OF TEST . 
2998 
2999 005114 op0000 TSTOTL: O :TOTAL NO. OF UNITS TO BE TESTED 
3000 005116 oo0000 TSINDX: O INDEX TO ONE UNDER TEST 
3002 
3003 005120 oo0010 TSVEC: .BLKW 8. sVECTOR ADDNESS IN ORDER OF TEST 
3005 
3006 o0S5140 op0010 TSBAE: .BLKW 8. ;RHBAE ADDRESS IN ORDER OF TEST 





000019 TSCS3: .BLKW ;RHCS3 ADDRESS IN ORDER OF TEST 
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000010 TSCOMD: .BLKW 9. ;COMMAND ADDRESS IN ORDER OF TEST 


000010 TSBASE: .BLKW 8. ;BASE ADDRESS IN ORDER OF TEST 


etatecetetal 
OS. ru £WMue-O 


;ERROR FLAG 
;IF ZERO Wilt, TYPE HEADER 
;IF ONES WILL NOT TYPE HEADER 


3 


x 


ATTENT: O JATTENTION BIT FOR ie 
TOTALAT: _ 43 TATAL ATTENTION BITS 


TMPO: .WORD ; TEMP STORAGE 


TMP1: oie 
TMP4: ‘Pen ; TEMP STORAGE 
RMANENT TABLE 
040 ;RS BASE ADDRESS 


:RP BASE ADDRESS 
;TU BASE RODRESS 
! MIXED BASE ADDRESS 

RS VECTOR ADDRESS 

RP VECTOR ADDRESS 

TU VECTOR ADDRESS 
PERMXV: 0 :MIXED VECTOR ADDRESS 
PERNUM: 4 ;NUMBER OF RH 

;WORKING TABLE 


DEVPNT: .BLKW 4 ; BASE ADDRESS TO BE TESTED 
-BLKW 4 


Rahs 


7 NUMBER OF RH FOUND 
: STORES BASE ADDRESS OF TEST DEVICE 
TESTVC: ; STORES veer OF TEST DEVICE 
ABOVE TWO IS BEFORE ANY 
‘DEVICE IS FOUND. 


; TABLE FOR DRIVE TYPES 
e=RSO4 SeRSO4/L, 4=R503/LA 

, 24020=DUAL’ PORT RPO4Y 

: 200) POR asec PORT RPOS 
jSOURE=SINGLE PORT RPO6, 24022=DUAL PORT RPOG 


05330 ooc00d 00000! O00002 TYPNT: .WORD 0,1,2,3,4,20020,24020,20021,2402!, 20022, 24022, 142010 
005336 000003 900004 20020 
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ees 
ape Earp 8500 POINTT: 0 ;POITER TO ABOVE TABLE 













3083 005362 O00014 NTYPNT: 14 ‘NUMBER OF ABOVE TYPES 
3071 005364 oo0000 TMPSLY: 0 TEMPORARY SLAVE COUNTER 
3058 s TABLE oF DATA FOR DEVICES FOUND 
3074 005366 o00004 FDEVIC: /BLKW sDEVICE FOUND, 1=TU, 2=RP DUAL 
3075 j SoBe SINGLE, 4=RS04, S=RSO3 
3076 005376 000004 FUNITN: .BLKW 4 UNIT NUMBER FOUND 
30 900004 FTYPE: :BLKW 4 ‘DRIVE TYPE FOUND 
3078 905416 O90004 FVECTR: .BLKW 4 : VE FOUND 
3073 000004 FBA KW 4 “BASE ADDRESS FOUND 
3080 OOs436 000004 FRHN BLKW 4 iH ER FOUND 
3081 o00004 FSLAVE: :BLKW 4 Ul6 SLAVE NUMBER FOUND 
3082 o054S56 o00004 FDRIVR: .BLKW 4 OR IVER ADDRESS FOUND 
O05466 o00004 FBRE:  :BLKW 4 *BAE ADDRESS FOUND 
3084 005476 Oo0004 FCS3: = :BLKW 4 :CS3 ADDRESS FOUND 












snes oosso&é co0000 TSTUNT: 0 $ END. OF NUMBER OF RH FOUND AT 

3088 005510 og000C WORUNT: O SAME AS ABOVE BUT TO BE 

3764 DECREASED AT END PROGRAM 

3091 905512 000000 VECTOR: O ; VECTOR UNDER TEST 

2092 905514 177740 LERADD: 177740 ;LOW name ADDRESS REG. 

3093 005516 17774e HERADD: 177742 ; HIGH ER ROR ADDRESS REG 
005520 177744 . MEMERR: 177744 MEMORY SYSTEM ADDRESS REG 





3094 
3035 000114 PARE70=114 ;PARITY ene VECTOR FOR 70 
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012737 
0004 
00S 


177777 
005012 


001190 
001140 
001000 


005736 
000176 


000174 
000004 


000000 
0 


000340 


O44O64 
045100 
o05242 
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00S01e 


173214 


001140 
001142 


177776 
000036 


BR STA 
BEGINe: CLR ST200 
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-SBTTL REGISTER TEST 
BEGIN: MOV eh Ast 200 


START: 
. SBTTL yt THE COMMON TAGS 


CLEAR THE COMMON TAGS ($CNTAG) AREA 
MOV #SCMTAG, R6 siTIRST LOCATION TO BE CLEARED 
CLR (R6)+ *CLEAR MEMORY LOCATION 
CMP #SWR,R& ;;DONE? * 
NE .-6 ;;LOOP BACK IF NO 
MOV #STACK, SP SETUP THE STACK POINTER 
js INITIALIZE A FEW VECTORS 
NOV wSSCO OSG A SHOTVEC s107 VECTOR FOR SCOPE ROUTINE 
MOV HecRAOR QHEMTVEC ; “EMT VECTOR FOR ERROR ROUTINE 
MOV . #340, J#EMT E 
MOV SeTRAP SETRAPVEC’ “TRAP VECTOR FOR TRAP CALLS 
MOV #340 gRTRAPVECS 7 
MOV #SPWRDN RVEC’ ; s POWER FAILURE VECTOR 
MOV #340 OAPRVECYS  LEVE 
CLR STIMES {INITIAL 12e NUMBER OF ITERATIONS 
CLR SESCAPE >:CLEAR THE ESCAPE ON ERROR ADDRESS 
MOVB #1, SERMAX *:ALLOW ONE ERROR PER 
. MOV u., SLPADR ‘geuP Tee THE LOOP ADDRESS FOR SCOPE 
MOV SLPERR : SET ERROR LOOP ADDRESS 
;;SIZE FOR A HARDWARE SWITCH pectéTe R. D0 


F NOT FOUND OR 
*:EQUAL TO A "-1", SETUP FOR A SP THRRE. SWITCH REGISTER. 
MOV 1 eRRVEC -(SP) ERROR VECTOR 


OV -:SA 
MOV #64 Se ARVEC ::SET UP ERROR VECTOR 
MOV #DSWR, SWR ::SE UP FOR A ‘HARDWARE SWICH REGISTER 
MOV tODIse> DISPLAY ;:AND A HARDWARE DISPLAY REGISTER 
CMP #t-1, ISWR pS TRY TO AREPEREN CE HARDWARE SLR 
BNE 66S ;;BRANCH IF NO TIMEOUT TRAP OCCURRED 
"AND THE HARDWARE SUR IS NOT = -] 

BR 65S ::BRANCH IF NO TIMEOUT 

64S: NOY #65S, (SP) ;}SET UP FOR TRAP RETURN 

65$: MOV #SWREG, SUR gy? #POINT TO SOFTWARE SWR 


MOV IoTePRee DISP 
66$: MOY (SP)+, SRERAVEE ”  SRESTORE ERROR VECTOR 


MOV #0,PS ;SET PROCESSOR STATUS TO O 

MOV #200, JTRAPVEC+2 -TRAP PRIORITY = 4 

MOV @#RPVEC, RO :GET RP VECTOR ADDRESS 

MOV #RPVECT: (RO)+ THIS IS FOR UNTIMELY INTERRUPTS 

MOV #340, (RO)  RPQY INTERRUPT SERVICE ROUTINE 
{PRIORITY =? 

ISR PC, J#STKINT sINITILIZE THE T 

CLR PRITEM : CLEAR FOR ERROR MESSAGE PRINTOUT 

TST aaF IRST TS THIS FIRST TIME ROUND 

BNE 1s BRANCH IF 
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fv 
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eee ee te ee ee te ee re re re se Te rr 7) 


DE HONK CDK KKK DIK IK DIC DK DIK DC DIK 2K ic ic ac oie ic 
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iB es : 000137 006114 18: IMP a#SND1 
154 104401 O06040 7 TYPE 63$ ;;TYPE ASCIZ STRING 
315 000426 BP 7 ‘GET OVER THE ASCIZ 
318 wa ine jages: "ASCIZ 715><12>/RH70 FUNCTIONAL CONTROLLER TEST DERHA-B/ 
3158 006114 012737 177777 OOSe42 SNDi: MOV #-1, DHF IRST ;NEXT_TIME DO_NOT GIVE HEADER ~ 
3159 006122 012737 037736 000114 MOV wPARITY J#PARE7O ;PARITY ECT OR 
31 06130 012737 O00340 O001i6 MOV JHPARE7O+2 “PRIORITY 7 
006136 912737 037600 000004 MOV tieout JHERRVEC : TIMEOUT VECTOR 
006144 012737 000340 000006 MOY #340, JHERRVEC+E :PRIORITY 7 


a. Se Pn i ee 


SIZE_FOR RH DEVICES 
“THIS TEST SETERNING ge RH rev ice IS ON THE SYSTEM. 
IF_THE SYSTEM HAS MORE THAN ONE R fH Pate a ONLY ONE OF 
Ly 3 DEVICES WILL BE USED IN THE FOLLOWING 
THE ONE THAT WILL BE_USED IS THE FIRST ONE Frat IS PRESENT 
a THE FOLLOWING LIST 


e 
™ 


THE WAY THE TEST WORKS IS AS FOLLOWS:- 

A REFRENCE IS MADE _TO THE CONTROL AND STATUS REGISTER 1 

FOR THE RS BY A TST INSTRUCTION. IF IT RESPONDS THEN IT IS 

Sesurey PRESENT AND THE LOCATIONS FOR THE I/O REGISTERS ARE 
FILLED WITH THE APPROPIATE ADDRESSES. 

Ma DRIVE TYPE REGISTER IS CHECKED TO HAVE GOOD 


IF_THE TST INSTRUCTION TRAPS TO_A NON EXISTANT VECTOR 
REGISTER 15 ATTEMPT IS MADE TO A RP CONTROL AND STATUS 


THEN A TM IS TRYED. 
THEN A MIXED SYSTEM WITH MORE THAN ONE RH DEVICS IS TRYED. 


s LEAKS ELERERERELEL RL ALL FA ELALERELEAELERERERALSTARARTAAAAARTAARAAE 
Tl: SCOPE 
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wie | 
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PATE 
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Ooc siitee 


JC. r 
me 
po 0-= 9~<9- 


04 
COES10 


o0eSl2 
006515 


00eSz2 


19440) 
OCO40e 


104401 
000417 


001302 


012700 
01270} 
C0S037 


905329 
00S250 
000001 


COb324 


O0SeSe 
00&376 


095300 
S0b41E 


oosese 
oco200 
005310 


005252 
OCS250 


G0S300 
005319 
00S222 
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81, STIMES 5300 ii ITERATION 
$7200 A edu TgRT 
2$ alcn’t NOT 200 START 
aPERRS, RO pointe TO MOVE 9 WMROS FROM 
1 NUMBER TO MOV 
SCE VENT R2 POINTER TO MOVE 9 TORDS Tc 
(RO), 1+, (R24 FILL WORK TABL’ 
13 :BRANCH IF 9 NOT DONE 
SETs1z 
6S$ 3 TYPE. ASCIZ STRING 
4g :GET OVER THE ASCIZ 
C15><12>/HOW MANY’RH TO BE TESTED -/ 
67S +:TYPE ASCIZ STRING 
Es -:GET OVER THE ASCIZ 
(Wh><l2>/ 7 
(SP). LTRY :GET NUMBER OF RH 19 we TESTED 
(SPs, HPO s KORKING NUMBER © 
i, TH NU ER ne ae Tye 
i INOES WORKING thBve 
£93 +3 1YPE ASCIzZ STRING 
b9¢ OVER THE ASCIZ 
C1e><12>/TYPE Bast ADDRESS OF RH NO? 
TMP, -(SP) 
4718 :TYPE ASCIZ STRING 
0g tISET OVER THE ASCIZ 
(1$><leo/ # 
(SP)+,DEVPNT(RO) ;FILL WORKING. TABLE WITH BASE ADDRESS 
733 i Tye re ASCIZ STR 
23 Ad OVER THE Reef sé 
<15><1l2>/TYPE ves +3" ADDRESS OF RH NO 
TMP1,-(SP) 
CRLF 
(SP)+,VECPNT(RO) ;FILL WORKING TABLE WITH VECTOR ADDRESS 
(RO)+ :AGD e.T0 R 
TMP] G NEXT RH NUMBER 
TMPO t SGUNT DOWN RH 70 SE TESTED 
33 :BRANCH IF ALL NCT DONE 
°RO WILL HAVE EME cE POINTER RI WILL HAVE VECTOR POINTER 
 #DEVP RO tcE POINTER 
OE EENT RI VECTOR EOI NTER 
TFOUND * SWILL BE USED AS POINTER 
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DERHAB. SRC Tl 


~) 
Ww 


fufuforuroroty 
Bato scr 
oO 
oF 
Bd} 


as 
i 


He 
i 


333 


CUCU LIUGIGIGIGIOIGY 
WIGIGIGIGIGIGIOIG 


1 
00S777 


Oler3? 
012737 


013702 
013762 


012737 


104146 


MACY 
Sit FoR 


zeeq 
BeNo68 
00S324 
ooodd2 


175266 
905339 
009014 


000001 
17S2S4 
099014 
005362 
005330 
010S44 
010000 


010536 


00S364 


000897 


010544 
095364 
040000 


00S32e2 
COS364 


007004 
176324 


1 27(732) 


005360 
00536 


00S362 
001126 


001126 


175206 


175202 
005364 
175104 


OOS446 
000004 
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RH DEVICES 


SSe: 
Be 3 000004 1S: 


2s: 


18: 


au 
alsa) 


my {RR}, TE Be eiere Fes tES 


me ares 


:IF NO rine’ but OCCURS TEN N EVIE th Festoy ia Beetent 
‘NOW FILL ALL REGISTER ADDRES 


Mov #22. ; 

MOV sRHee1 RO :GET BASE LOCATION: 

MOV TESTDV.R4 :GET BASE ADLRESS 

MOV RY, (RaS+ ‘FILL PROPER ADDRESS 

apo #2.R4 IN NCREMENT ADDRESS BY 2 

DEC Re UN 

BNE 2$ BRANCH IF 22 NOT DONE. 

CLR aRHCS2 :SET UNIT NUMBER. 

MOV STYPNT,POINTT ;POINTER TO DRIVE TYPE 

MOV #14, NTYPNT ‘NUMBER OF DRIVE TYPES 

CMe 81, NTYPNT :IS IT FOR Tu 

BEQ +7 IF FOR TU BRANCH 

MOV SRHDT se0087 "READ DRIVE TYPE 

MOV #14 R2 spe FOR DT NOT DONE 

sug NTYPN = pit -GET DT TO DO. 

ASL Re PLY Re BY 2 

CMP TYPNT(R2), seppar’ ue TRIE TYPE FOUND 

Beg 16§ ;DRIVE TYPE FOUND SO BRANCH 

BIT BNED, SRHCS2 :IS IT NON EXISTANT DRIVE 
ED NOT SET, DRIVE TYPE FOUND SO BRANCH 


BEQ 
eA DEVICE HAS NOT BEEN FOUND 
SMP sss ;A DEVICE HAS NOT BEEN FOUND SO BRANCH 


i TRYING THe TY TUL6 DRIVE TYPE a 
MOV THPeLY JRHTC :H0 OVE SLAVE NUMBER IN TAPE CONTROL 


:READ DRIVE T 
BIT BSLVPR, $BDDAT IS SLAVE PRESENT 


SNE 
CME #7, TMPSLY :1S 7 DONE 
BNE is :BRANCH IF 7 DONE AND NONE FOUND 
INC MPSLV :GET NEXT SLAVE 
HOV tRE- JRHCS1 sSLEAR, CONTROLLER ERRORS 
-@ DEVICE HAS BEEN FOUND’ SAVE SLAVE 
hoy TFOUND Re Re ena ie NO OF RH FOUND x2 FOR INDEX 
“A DEVICE HAS sEEN FOUND TEST VECT 
hoy 893 ERR VEC s TIME OUT OE TOR TO REPORT ERROR 
qs? atest Tay Y TIME OUT ON VECTOR 

10$ :, VECTOR EXISTS SO CONTINUE 
ERROR 146 "A DEVICE BASE ADDRESS DID NOT 


TIME OUT BUT ITS CORRESPONDING 
;VECTOR ADDRESS TIMED OUT 
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BePHIS B8bPe? 


o0C004 
009995 
COO00E 
000807 


041572 
005324 


000650 
OOS4S6 
oo0ose 
095476 
000019 
000011 
000012 
000013 
oc0014 
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005366 


O0S4Sé 


C0S366 
OOS366 
005366 
005356 
005366 
COS366 
OOS45S6 


005366 
005366 
005366 
00S366 
O0S366 
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HALT 


aR 8$ 

:@ DEVICE HAS BEEN FOUND’ AND VECTOR. RESPONDS 50 STORE RESULTS 
0 H FOUND “3 FOR INDEX 

MOV NTYPNT, * POEVIC( RE! DEVICE pert 2,3,4,5,6, 7=RP; 


MOV - ORHCS2, FUNITN(R2) 


Mov 






ar CONTINUE TO REPEAT THIS 


sREPEAT THIS TEST 


1 Hl 12,13; 14=R6 


Bic 77770, FUNITNIR2) GKEEP UNIT NUMBER 


MOV RHDT FTYPE(R2) 


jORIVe gyre 
MOV ESTVC, FVECTR(R2} OR 
MOV TESTDV, FBASEA(Re) :BASE ADDRESS 


INC FRHNM(R2) 
ete #1 FDEVIC(R2) 


MOV TFOUND; FRHNM(R2) 
FRHNM (Re) 


NUMBER X2 MINUS ONE 


RA NUMBER MINUS ONE 
: MBER 


3 1 ANCH IF NOT TU 
MOV #CMNDTM, se “DRIVER ADDRESS FOR TU 


MOV TESTDV, 
ADD #<2#14">, (SP) 
MOV (SP) FEAR Re) 


ADD #2, (SP) 
MOV tS) +, FCS3(R2) 


CMP Be FDEVIC(RE) 
CMP re FDEVIC(Re) 
CMP rf FDEVIC(R2) 
CMP a5 FDEVIC(R2) 
CMP He FOEVICCRA) 
oe ip FDEVIC(Re) 


‘BRANCH IF NOT RSO3 





ASE ADDRESS 
sASTH ADDRESS Is BAE FOR TU 
VE BAE 


SAVE ADDRESS Is CS3 FOR Tu 


3 SAVE CS3 FOR T 





31S IT RP DUAL PORT 
; BRANCH iF RP FOUND 


T 
: BRANCH IF_RP FOUND 
32S IT RP DUAL PORT 


:BRANCH IF RP FOUND 


S iT 
BRANCH IF_RP FOUND 
1S IT RP DUAL PORT 
BRANCH IF RP FOUND 
31S IT RP 


NE 1 “BRANCH IF NO R 
MOV SCMINORP,, FORIVR(R2) - DRIVER ROGRESS FOR RP 
MOV TESTDV, 5 (SP) :BAS 
ADD 8<2#20: > :215T BODRESS IS BAE FOR RP 
MOV ($F) FéAb Re) SAVE B 
ADD : 22ND BRORE Se Is cs3 FOR RP 
MOV CEB) > FcsacRe) :SAVE CS3 FOR Ri 
BR SS1 
CMP B1O,FDEVIC(R2) ;IS IT RSO3/L 
EQ ; BRANCH iF RS03/LA 
“HAP #11, FDEVIC(R2) 

BEQ 14§ : BRANCH IF REO4/L 
CMP #12,FDEVIC(R2) ‘31S IT RSO4 

BEQ 14§ ; BRANCH IF RSOY 
CMP 813,FDEVIC(R2) :IS IT RSO3/L 

BEG 4 ; BRANCH IF as03/L 
CP #14, FOEVIC(R2) T 
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104401 
000406 


O1b246 
104405 
10440! 
o00411 
D1s24e 
1044ce 
1904401 
000404 
9227 

e010 

104401 
000410 


016246 
104405 
000137 


000411 
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SIZE FOR RH DEVICES 


pAdage OOS4S6 = 14$: 


090030 


bes 47 


007374 


005436 


007424 


00S426 
Gu7462 


000001 
007510 


OOS4+46 
010336 


000002 
007560 


010336 
000003 


007624 


005365 


005366 


005366 


1S$: 


SS1: 


;; 655: 


4g 


»:67$: 
$: 


big? 


sig: 


1$: 


ig 


es: 


biges’ 











MOV RS,FDRIVR(R2) _;DRIV DRESS FOR RS 
nb FEUUR SLE RBIVR CRE) | gOR AER .EO 
9<2#12.>, (SP) te ADDRESS IS BAE FOR RS 

soy (SP) FBAE(R2) SAVE i ee RS 
Q - #2, (SP) 24TH RE : 15 CS3 FOR RS 
MOV ES) >, FCS3(R2) SAVE C 15 
cl $1 : CONTI or id 
HALT “PROGRAM ERROR 






;NOW TYPE RESULT 








TYPE &S$ : TYPE ASCIZ STRING 

BR 4g !GET OVER THE ASCIZ 
"ASCIZ <15><12>/0N RH NO” 

HOV FRHNM(R2),-(SP) ; TYPE RH NUMBER 

TYPE 675 sr UMfe ASCIZ STRING 

BR bes T OVER THE ASCIZ 
-ASCIZ 

MOV FBASEA(R2),-(SP) ;TYPE BASE ANNRESS 














TYPOC 
TYPE 695 ;; TYPE ASCIZ STRING 
BR 8$ ;;GET OVER THE ASCIZ 
ASCIZ / FOUND/ 
CMP $) FORVEC(RS) 31S IT 
BNE 1 ‘BRANCH NOT 
TYPE 71$ +3 TYRE agers STRING 
BR 0$ ;;GET OVER THE ASCIZ 
ASCIZ / TUL AT SLAVE’ 
OV FSLAVE(R2),-(SP) ;TYPE SLAVE NUMBER 
TYPDS 
JMP 6$ 








Te FOLLOWING TYPES OUT 











=RP S 
G=ERSOU/L 
:S=R RS03/cB, BSoavi R03 

CMP 82, FDEVIC(R2) 1S IT RPO6 DUAL 

BNE 5 : BRANCH re NOT RPOE SUAL PORT 

TYPE 73$ is URE ASCIZ STRING 

BR 25 T OVER THE ASCIZ 

-ASCIZ / RPO& DUAL PORT’ / 

IMP 6S 

CMP #3,FDEVIC(R2)  ;IS IT RPO SINGLE PORT 

BNE 3$ : BRA NCH IF NOT ees SINGLE PORT 

TYPE 75$ 53 TYRE cIZ STR 

BR : GET oven HE Agct2 






4G 
"ASCIZ / RPO SINGLE POAT, 









co 


ete 


Ooress 


se 


Seeesss S8888ss8 
8888 = 
BaHE] Js oe 


Be 


FOCOrS VEOToRe hor 


Ob 2 2 ee + > 6 = 2-2 eh 


fo 
nv 


Po cree 


0 9 be = b= <b be he sh 0 ho Bo po pe he 9 
j=) 
rT 


O0OOO0O00O NOOOOOONO AOBG00000 o0a0 


010230 
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010336 
000004 


000002 
007676 


010336 
000005 


000903 
007746 


o00c06 
oc000e 
010016 


000007 


000003 
010064 


900018 


ooocos 
010134 


000011 


090004 
010174 


000012 


000004 
010232 


0O0S366 
005366 


005366 


005366 


005366 
O0S366 


005366 
005366 


005366 
005365 


005366 
00S366 


005366 
005366 


3$: 


6$ 33 
7 RPOS DUAL PORT/ 


Be 
W4,FDEVIC(R2) ;15 IT RPOS DUAL PORT 
4 ;BRANCH IF NOT RPOS DUAL PORT 
#2, FDEVIC(R2) 
( 


5 :; TYPE ASCIZ STRING 
? *:GET OVER THE ASCIZ 


6$ 4 
WS, FOEVIC(R2) 1517 RPDS. SINGLE PORT | 
83 'BRANCH IF NOT RPOS SINGLE PORT 
#3, FDEVIC(R2) 


745 5; TYPE ASCIZ STRING” 
>ag *:GET OVER THE ASCIZ 
7 RPOS SINGLE PORT/ 


6$ 
#6,FDEVIC(R2)  ;IS IT RPOY DUAL PORT 

;BRANCH IF NOT RPOY DUAL PORT 
te, FDEVIC(Re) 


gis :;TYPE ASCIZ STRING 
Og ::GET OVER THE ASCIZ 
7 RPOY DUAL PORT’? 


6$ . a. 
#7,FDEVIC(R2)  ;IS IT RPOY SINGLE PORT . 

:BRANCH IF NOT RPCY SINGLE PORT 
#3, FOEVIC(R2) 


82g 3 :; TYPE ASCIZ STRING 
825 -:GET OVER THE ASCIZ 
7 RPOY SINGLE PORT/ 


&$ 
#10,FDEVIC(R2) ;IS IT RSO3-LA 

11 ;BRANCH IF NOT RSO3-LA 
#5 FDEVIC(R2) 


3 ;;TYPE ASCIZ STRING 
845 :GET OVER THE ASCIZ 
7 RSO3-LA/ 


6$ : 
S11,FDEVIC(Re) ;I1S IT RSO4-L 

;BRANCH IF NOT RSO4-L 
#4 FDEVIC(R2) 


Q7g5 ;;TYPE ASCIZ STRING 
6$ GET OVER THE ASCIZ 
7 RSOY-L/ 


6$ 

#12,FDEVIC(R2) ;IS IT RSOY 

1 ;BRANCH IF. NOT RSO4 
#4 FDEVIC(Re) 


99 :; TYPE ASCIZ STRING 
8$ GET OVER THE ASCIZ 
/ RSOY/ 


















Gt 
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1 


Hee 
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—— 


RRLGGMH SSB Z 
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a i ae be od 


anne RengaeS 
eee p9eee eeesee Seeee 
oO Ondo 

ge secen AEs 


TRACT 
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99992 288 

wip SW 
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000013 005366 138: 


br eee 


000014 


000005 
010324 


010344 


005376 
0104Ce 


OOS416 
010440 


0154Se2 


ooocde 


005320 
006526 
COS322 
O0SS06 


005510 
010622 


005320 


O0S365 


005366 
005366 


005322 


73: 
SS3: 


SS4: 
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6 
BHP £13, FDEVIC(RE) 31S IT RSO3-L 
BNE 4 BRANCH IF NOT RSO3-L 
MOV #S FDEVIC(R2) 


TYPE als ;; TYPE ASCIZ STRING 
BR O$ ::GET OVER THE ASCIZ 
-ASCIZ 7 RSO3-L/ 


BR 6$ : 

CMP #14,FDEVIC(R2) ;IS IT RSO3 

BNE S$ BRANCH IF NOT RSO3 
MOV #5, FOEV' (Re) 


TYPE 935 11 TYRE ASCIZ STRING 

BR 2s :GET OVER THE ASCIZ 

-ASCIZ 7 RSO3/ 

BR 6S 

HALT ;PROGRAM ERROR 

TYPE 95$ ; TYPE ASCIZ STRING 
OVER THE ASCIZ 


BR 845 
"ASCIZ (15><12>/AT UNIT’ AUMBER/ 


HOY FUNITN(R2),-(SP) ; TYPE UNIT NUMBER 
TYPE 975 sr TYPE ASCIZ STRING 
BR 368 ‘GET OVER THE ASCIZ 
.ASCIZ VECTOR’ 

HOV FVECTR(R2),-(SP) ;TYPE VECTOR 

TYPE 995 :; TYPE ASCIZ. STRING 
BR PHGET OVER asciz. 
ASCIZ <(1S><1a>7 7 | 

TYPE 101$ :;TYPE ASCIZ STRING 


ee 0 3;GET OVER THE ASCIZ 
eASCIZ = <15><12>/7 / 


;UPDATE TFOUND 


ADD «82, FOUND © —=s«;GET_ READY FOR NEXT DEVICE 
ALL UNITS DONE? IF LTRY BECOMES ZERO YES ALL DONE 
bEC ;REDUCE DEVICES LEFT TO TRY 
BEQ _ *BRANCH IF ALL COMPLETE 

IMP Sse “ALL NOT DONE 

MOV TEQUND, -(SP)  ;GET TWICE NUMBER OF RH FOUND 
ASR (SP) :DIVIDE BY 2 

MOV (SP), TSTUNT 

MOY {SP)4, WORUNT 

IMP JUMP TO NEXT TEST 

“A RH TIMED out SO TRY NEXT UNIT OR END TRYING 

bEC H TIMES OUT SO DECREASE RH TYPED 










3544 tea 

ae 
3548 

38439 010536 

ay Stee 

oe 

ee tie 

3555 Bibs 

10574 

3557 010600 

3558 010604 

3559 010606 
3560 

3561 010612 

3$&2 010614 
3563 

010616 

0622 

0624 

0632 

0646 

OG4E 

0652 

O656 

0660 

0662 

0666 

0674 

0674 

0700 

0722 

0722 

10726 

730 

734 


PATIOS C11 -CERG A 
DERHAB. SRC 1 


000004 
012737 
012737 
012737 


013746 
013702 
162602 
006302 
104401 
000402 


104401 
000410 


016246 
104405 


104401 
000410 


Biba 
040000 
00S362 


006616 
173306 
040000 
173274 


010520 


000001 
037600 
000340 
005510 
OOSSO06 


010670 
010702 


005436 


010736 


173314 


173270 


0012le 
000004 
COO006 
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BEQ 1$ 
1$: TNE 225 


Or 


;BRANCH_IF ALL DONE 


:A DRIVE TYPE DID NOT MATCH SO TRY NEXT 
sss: MOV #TRE, JRHCS1 -CLEAR NED ERROR 
558: DEC NTYPNT : DECREASE NUMBER OF DRIVE TYPES TRIED 
BEQ 1$ ‘BRANCH IF ALL DONE 
IMP 657 : T 
1$: INC BRHCS2 GET NEXT UNIT NO. 
MOV #TRE. JRHCS1 *CLEAR NED ERROR 
MOV DRHCS2,.-(5P) :GET RHCS2 
BIC #177770, (SP sGET UNIT NO 
CMP #8. , (SP5+ ARE 7 DONE 
BEQ 2g BRANCH IF 7 DONE 
IMP SS6 :7 NOT DONE SO TRY NEXT UNIT NO 
2s: ERROR 147 ; DEVICE ADDRESS DID NOT TIME 
HALT :QUT BUT NO U HAD 
: APPROPRIATE UNAIVE TYPE. 
IMP ssy 
3 ak Gat nee a ee 
‘ATES UNIT UNDER TEST 
3 euIS TYPES THE UNIT TO BE TESTED 
i AND IS THE FIRST TEST AFTER THE END OF THE PROGRAM 
aes Oe eouakarea_ trey ome 
MOV MES ;;D0 1 ITERATION ~ 
MOV itteout JHERRVEC s TIMEOUT VECTOR 
MOV #340, JHERRVEC+E :PRIORITY 7 
MOV WORUNT,-(SP) | ;GET WORKING RH NUMBER LEFT 
MOV TSTUNT, R2 :GET TOTAL NO OF RH FOUND 
SUB SP)+,Re ;NO OF RH TO BE TESTED ' 
ASL INDEX FOR RH To BE TESTED. 
TYPE S$ >: TYPE ASCIZ STRING 
BR 645 :GET OVER THE ASCIZ 
j i858: SASCIZ <15><12>/ / 
TYPE 675 5 TYPE ASCIZ STRING 
R 6S ‘GET OVER THE ASCIZ 
i678: ASCIZ <15)<12>/TESTING RH NO/ 
V FRHNM(R2),-(SP) ;TYPE RH NO. 
TYPDS 
TYPE 69S " ¢sTYPE ASCIZ STRING 
BR ::GET OVER THE ASCIZ 
33698: .ASCIZ / USING /’ 


Hitt Bone BN bed Ntiace oF AH FOUND 









es 


aaa 
O00 IO uUl.£ Uru 


3631 


RORuONORReR 


O0000 C200 2800 OOO0000 DBOO000 VB2OO000 202000000 
a hh hh ee eee et ee 
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010756 
010756 
019762 


#3 


b= b= b+ pe 


BBSESS SRR 


= Db b= b= Fs 


e 


Ce el ee en ee re b= b- + b+ & + pp 


Feore COPSRH POSSRS 


av atiat lett 
— 
tw 


ror 
Brow 


err rd a ed de ded ed dd ld ed ed er ed ed ee eee ee ee ee 
Ofwre Roo 


Te 


000401 
000000 


104401 
000411 


0162 

Toss 
104401 
000411 
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010764 


005426 
000001 
011020 
OOS446 


oo0002 
011066 


000003 
011126 


oocc04 
O11166 


000005 
011214 


011234 


005376 
011272 


COS366 


005366 


005366 


005366 


005366 
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68$: 


106 


71$ ;;TYPE ASCIZ STRING 

0 ;;GET OVER THE ASCIZ 

/ BASE 7 

FBASEA(R2) ,-( SP) s TYPE BASE ADDRESS 

#1,FDEVIC(R2) 31S IT 4 2 

1$ ANCH 

738 TYPE sehen 
;;GET OVER AScIZ 


e$ 
/ TUL6 AT SLAVE/ 


FSLAVE(R2),-(SP) ;TYPE SLAVE NUMBER 


&$ 
#2, FDEVIC(R2) iIS IT RP DUAL PORT 
es RANCH IF NOT RP DUAL PORT 
75$ tire ASCIZ STRING 
T OVER THE ASCIZ 


ous 
7 RP DUAL PORT / 


6$ 
#3,FDEVIC(R2) 
77$ +3 
6$ 

7 RP SINGLE PORT?’ 


ils. IT RO Siw PORT 
RANCH IF NOT _RP 
its ASCIZ STRING 

T OVER THE ASCIZ 


6$ 
#4,FDEVIC(R2) ;IS ITR 
Ug ; BRANCH ia “Not RSO4 
795 :TYPE ASCIZ STRING 
9g tt oeT OVER THE ASCIZ 
7 RSOY/ 
6$ 
#5, FDEVIC(R2) 1S IT RSO3 
S$ RANCH IF NOT RSO3 
81S TYPE ASCIZ STRING 
O$ 33GET OVER THE ASCIZ 
7 RSO3/ 
6$ 
;PROGRAM ERROR 
83S ;;TYPE ASCIZ STRING 
T OVER THE ASCIZ 


$25 : GE 
(15> <12>/AT UNIT’ NUMBER/ 
FUNITN(R2),-(SP) ;TYPE UNIT NUMBER 


8S$ ppg ASCIZ STRING 
VECTO ra OVER THE ASCIZ 












JO6 
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84S: 





-_ 
Bam 3 





1! 
: 0 o0S416 MOV FVECTR(R2),-(SP) ;TYPE VECTOR 

Fe ass queens 10 

ea ilies tem fee mY Seale azn 

seo at tss8 pieced Bee MOV FEES RS, ac aE Bese L008 ig 

bg 011336 010524 7S: MOV RS, (RY)+ jFILL PROPER ADDRESS 

366 O11 349 705 ooo0c2 ADD #2; RS MENT BY 2 

64 O11 DEC R3 DOWN 

65 01134 901373 BNE 7§ CNT IF 20 NOT DONE 

spe 011350 916237 005376 ooSso10 : MOV FUNITN(R2) ,UNIT ;UNIT NUMBER 

3668 011356 016237 416 905512 MOV EVECTR(R } VECTOR | 5V - VECTOR 

$069 11364 Oibe3? 446 OO4660 MOV FSLAV LAVE NO 

36 11372 016237 OOS4S6 004640 MOV FORIVA( R2) ’ COMND saLAVE ADDRESS 

3671 011400 016237 005466 004130 MOV FBAE(R2),RHBAE ;BAE ADDRESS 

i O1140& 016237 005476 004132 MOV FCS3(Re),RHCS3 :CS3 ADDRESS 

3674 011414 005037 o45100 CLR PRITEM 






3684 : © KEKE H LAK AK KALE LAH K ALEKS LAE HK AE HELE KALE KEL SKE KAL ASAE LAF KS ELES 
2685 kT ST 3 BIT BANG RHCS! 

3687 :% TEST LOADING AND READING OF ALL POSSIBLE BITS 

3688 * IN RHCS1 REGISTER. 

3689 * USE @ PATTERN OF WBLKING 1°S (1,2,4,10 ETC) 

3690 * x AND WALKING O°S (-2.-3,-5 £ 

3691 1% IN THIS TEST st1 The! nCPE fove!eIT|2¥BIT1O!ROY:G0 BITS WILL NOT BE WRITTEN INTO 
3692 1x AND RDY!DVA BITS WILL ALWAYS BE SET 

2693 * AND BITIO BITS WILL ALWAYS BE CLEARED 

3694 * IF SWITCH 14 OR 9 OR § ARE SET FOR DEBUGGING 

3695 ti THEN A RH CLEAR (RHCSe BIT #5) WILL BE 

3696 * GIVEN TO AID SCOPE SYNCS ON THE CLEAR 

24 3% SIGNAL. 








36393 er Rt eee oe 
3700 911420 oo0004 +673: E 

3701 Oli4¥22 012706 001000 ROY #STACK, SP RESET STACK 

$702 011426 012737 O00003 oco4eSs6 MOV #3, a8TSTNM SAVE TEST NUMBER 

704 011434 004737 o40312 ISR PC, JSCLDISK : GIVE RH INITIALIZE 

705 SETUP U ER 

3706 : CLEAR ane AND FUNCTION BITS IN RHCS1 












2708 O11440 012737 176201 OO4ES0 MOV #SC! TRE!MCPE!DVA!BIT12!BIT1O!RDY!GO,WRTBIT ;SC!TRESMCPE!DVA! 
3709 O11446 012737 004200 204652 MOV WROY!DVA,SETBIT ;ROY!OVA ARE BITS ALWAYS 
3710 011454 012737 002000 OO4ES4 MOV #BIT1O,CLRBIt ;BITIO ARE BITS ALWAYS CLEARED in| § 









KO6 
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DERHAB . SRC T3 BIT SANG RHCS1 












1 sFLOAT 1°S THRU THE RHCSI 
a8 011462 012737 011506 001110 Mov aes SLPERR TL GOP On ON ERROR ADDRESS 

314 11476 127 MOV iS TTING READY To FLOAT A ONE 

ote ptieoo O4ers itt se ee vais TotBiTiOr EAR BITS NOT WRITTEN 

a 

aie Bitete Ago584 BOtTES 2s. Bt ast They nCPE Oe ih oa suit pace 3 on @ at 
3718 11514 00140 SEQ 3$ 

cay 11516 052777 o00040 172344 BIS #CLR, JRHCS2 ae ¢ abet AOR ce SC 

re 11 13777 72326 3$: MOV DAT, WR TER 

3 Bt ies3 17737 OOaiE3 heft 6 MOV Pee] $80 Heat Hee RRceT: ESTE 

ce tues pee Gee Bee Te) GPa arate 

ue 

ao5¢ Bilede Gastar ppiesG bortse ad ScoDAT, SeD0eT i FEcT 

3726 011562 001404 BEQ BRANCH IF 

3727 011564 013737 OO4O60 O01122 MOV RCSL, SSDADR § :GET REGISTER ADDRESS 

3728 011572 104137 ERROR 137 ‘ONE WAS BEING FLOATED 

78 : THRU RHCSI RE REGISTER 

7 ON READING RHCS1 BACK 

3731 IT ets WHAT 

33 011574 o00e41 4S: CLC CLE CARRY 

3734 011576 O06305 ASL RS :GET 1 ONE LEFT 

3735 011600 103335 BCC 15 ‘BRANCH IF 16 NOT DONE 

a3? FLOAT A ZERO THRU RHCS1 REGISTER. 

3739 1 1608 012737 611626 001110 MOV #6$, SLPERR ;SET LOOP BACK POINT 

3740 O11610 Ole70S 177776 MOV #177776 Rs : GET READY TO FLOAT A ZERO 

3741 011614 G10S37 601124 S$: MOV RS, $GDDAT “GET READY TO WRITE DATA 
_ 3742 011620 042737 176201 001124 BIC asc! Tae 1NcpespvalgTs21BIT10#RDY!C0 $GDDAT -CLEAR BITS NOT WRITTEN 
3743 O11626 032737 O41400 OO114O 6S: BIT #BITIY'BITSIBITS,SWR -ARE SWITCHES 14 OR 9 OR 8 SET 
3744 11634 001403 BEQ ‘BRANCH IF ANY aa THE ABOVE SET 
ss 11636 0912777 OO0040 172224 MOV #CLR, JRHCS2 CLEAR FOR SCOPE AID TO 

3747 O11644 013 001124" 172206 7%: MOV $GDDAT,@RHCS! WRITE INTO RH’XA. 

3748 O116S2 017737 172202 COlle6 MOV gRHCSI, "$BDDAT READ RHCS1 

2749 O11660 053737 Oo4652 001124 BIS SETBIT.$GDDAT  ;SET BITS ALWAYS SET 

3750 O11666 043737 OO4654 001104 BIC CLRBIT, $GDDAT ‘CLEAR BITS ALWAYS O 

3751 011674 023737 OO1124 OOlle6 CMP SGODAT,SSDDAT  :TEST 

3752 011702 001404 BEQ 8 BRANCH IF GOOD 

3753 011704 013737 OO4CS0 001122 MOV RHCS1,SBDADR § :GET REGISTER ADDRESS 

3754 O11712 104137 ERROR 137 : ZERO aa eae 









: | SON READING IT 8 
3757 | ;DID NOT CONTAIN WHA 
3758 ——« GWAS EXPECTED 








3760 O11714 000261 BS: SEC 
3761 O11716 006105 ROL RS 
3762 911720 103735 er BCS SS 








3765 s FKLKKKKRAKKERERELEREA LL AA AAA AL ALAA ERAEAE RA ALARA LALLA ASA ARARAHRAARE 
3766 t LTEST 4 BIT BANG RHCS2: 





LO6 


MAINDEC-11-DERHAS-A MACY11 27(732) 22-SEP-76 15:11 PAGE 78 
DERHAB. SRC G RHCSe 


TY BIT SANG 
Bee tee Pia READING OF ALL POSSIBLE BITS 
TT ae 1’ EF (1, 2,4,10 ETC) 


-SE 
In THis TEST a7 alts rite NOT BE WRITTEN INTO 
IFS SW ITCH 1H OR 9 OR 8 ARE SET FOR DEBUGGING 


(RHCSe BIT #5) WILL BE 
GIVEN 70 AID SCOPE SYNCS ON THE CLEAR 


2K eR Re he ee oie 2c 


Tr suiay + aeeuicameeeeeeaeuieoneeneeemeememeamemmeamemeeen 


+éT4 
MOV #STACK, SP RESET STACK 
MOV #4, J8TSTNM “SAVE TEST NUMBER 


JSR PC, d#CLDISK ;GIVE RH INITIALIZE 
SETUP UNIT NUBER : 
CLEAR RHWC AND FUNCTION BITS IN RHCS1 


004650 MOV #177740, WRTBIT i} 7770 BRE BITS NOT WRITTEN INTO 
oo4ss2 MOV #IR, SETBIT :IR ARE BITS ALWAYS SET 


*FLOAT 1’°S THRU THE RHCS2 REGISTER 
001110 Mov 7 S$LPERR ; SET LOOP ON ERROR ADDRESS 
0001 yy a. rey TO FLOAT A ONE 
001124 : MCV 


iB pote 

14 01140 : #B1T14!8 T9!BITS,S S 14 OR 9 OR 8 SET 
Q 3$ F ANY ONE SET 

oooo40 172050 #CLR, JRHCS2 G1 VE GLEBE beans = 


001124 172 : $GDDAT , ARHCS2 
172036 RHCS2, SBDDAT 
O046Se SETBIT, SGDDAT CET ALWAYS SET BITS 
0011e4 OO01126 SGDDAT;SBDDAT  ;TEST 
4 BRANCH IF GOOD 


Q 
004070 O0llee MO RHCS2, SBDADR GET REGISTER ADDRESS 
104137 ERROR 137 ONE WAS BEING FLOATED 
; THRU _RHCS2 REGISTER 
ON READING RHCS2 BACK 
IT DID NOT CONTAIN WHAT 
EXPECTED. 


$GDDAT ISTART W H DA 
RS, $600 GDDAT 5 CLEAR Dyhe WRITTEN INTO 


000241 : CLC 
ASL RS ONE LEFT 

BCC 1$ BRANCH IF 16 NOT DONE 

;FLOAT A ZERO THRU RHCS2 REGISTER. 


001110 #6$ SLPERR :SET LOOP BACK POINT. 
1177776 :GET READY TO FLOAT A ZERO 
cs: GET READY TO WRITE D QTA 
001124 tea SGDDAT ‘CLEAR BITS NOT AReTEN I 
001140 6S: #BITL4!81T9!B1T8. SWR ire SWITCHES 14 OR oY OR 9 SET 
7g ‘BRANCH IF ANY OF THE ABOVE SET 
171736 #CLR, IRHCS2 CLEAR FOR SCOPE AID TO 


63 60 60 09 60 60 COED ED ED ED 


WWWW 
Wwr-OWONnNMUI Twrme-ow 





MAINDEC-11-DERHAB-A 
DERHAB . SRC TY 


019757 


ERO Lr OM 


104137 


000261 
006105 
103740 


012306 
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BIT SANG RHCS2 


P1784 
4652 
1124 


004970 


001000 
o0000s 


040312 


177660 
000000 
001660 


012270 
041400 


OO0040 
o01124 


;SYNC_IF EBUG 
At? 7$: se0nel SE DDaT HBLTE.INtg H’ XA. 
T 


Lisa E18 Tf’ $GODAT BITS ALWAYS SET 
1le6 Me GODAT; SBDDAT i$ ST 
$ ;BRANCH IF 
001122 RHCS2, S8DADR ; ST 
137 NG chen ee 


E 
see 0 BE 
; THRU e REGISTER 
ON READING IT BACK IT 
DID NOT CONTAIN WHAT 
;WAS EXPECTED 


GO0D 
R ADDRESS 


RS 
S$ 


5 EEK KEK ERA R ERR R ERE EKER EERE EERE REAR EERE EERE EE EERE AE REE 
EST S BIT BANG RHCS3 


TN AHCSS REGIS) AND READING OF ALL POSSIBLE BITS 
A PATTERN OF WALKING 1°S (1,2,4,10 ETC) 
BND WALKING 0°S (-2,-3,-5 ETC) 
IN THIS TEST 177660 ‘Bits WILL NOT BE WRITTEN INTO. 
AND 0 BITS WILL ALWAYS BE SET 
AND if Uk AH Sg S!BIT4Y BITS WILL ALWAYS BE CLEARED 
IF SWITCH 14 OR 9 OR 8 ARE SET FOR DEBUGGING 
THEN A_RH clea AR (RHCS2 BIT #5) WILL BE 
Sa TO AID SCOPE SYNCS ON THE CLEAR 


HK IK HE ic KK DK ic oe ie oc oe 


+ mgr °° amma ceeaatots ncammusetiaaai ists tt cena 


+éT5 
MOV #STACK, SP ;RESET STACK 
co4ese MOV #5, 08 TSTNM SAVE TEST NUMBER 


JSR PC, a#CLDISK ‘ete UN pute 
CLEAR RHWC AND FUNCTION BITS IN RHCS1 


004650 MOV #177660, WRTIBIT | i 177660 ARE AS wor WRITTEN INTO 
004652 MOV #0, 5ET :0 8 RE BITS ALWA ET 
OO46S4 MOV weITS!8TTo! BIT7!BITS!BITY, CLRBIT jBryS!BrTa! BIT7!BITS!BITS ARE BITS ALWAY 


“FLOAT 1°S THRU THE RHCS3 REGISTER 
001110 OV #23, SLPERR ;SET LOOP ON ERROR AQDRESS 
ai, Re : GETTING READY TO FLOAT A ONE 
1$: ‘START WITH DATA 
001124 eet $GDDAT :CLEAR BITS NOT WRITTEN INTO 
001140 2s: #BITIYIBITSIBITS,SWR ARE SUITCH ES 14 OR 9 OR G SET 
3$ ‘BRANCH IF ANY ONE S 
171562 #CLR, JRHCS2 sive Oh CLEAR APOR SCOPE 


; EBUG: 
17i61E 38: $GDDAT,JRHCS3 =; WRITE HOS REGISTER 














MACY11 27(732) 
BIT SANG RHCS3 
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DERHAB. SRC TS 


et ce eee eee eae 


MK OK CE Coc KC ic * 


ec ee ee ee ee ee ee wee ee ee 







HOY aRHCS3, SBODAT ere Res REGISTER acm 
Bie STB TT’ Sepbat ise SALIRYS ST Bl *E 
MP i DDAT;SBDDAT ; 
iB cH IF GOOD 
RHC, ,SBDADR =; GET REGISTE 



















; ACK 
sIT DID_NOT CONTAIN WHAT 
sHAS EXPECTED. 

CLC CARRY 
ASL RS CET 1 ONE LEFT 
BCC 1$ ;BRANCH IF 16 NOT DONE 








;FLOAT A ZERO THRU RHCS3 REGISTER. 
MOV #63, SLPERR ;SET LOOP Boek POINT 








MOV #177776, RS :GET READY TO FLOAT A ZERO 

MOV RS, SGDDAT *GET READY TO WRITE DATA 

BIC #177660,$GDDAT :CLEAR BITS NOT WRITTEN INTO 

BIT #B1T15! 8179! B1TB° SWR :ARE SWITCHES 14 OR 9 OR 8 SET 
BEQ 7$ ‘BRANCH IF ANY OF THE ABOVE SET 
MOV #CLR, JRHCS2 ;CLEAR FOR SCOPE AID TO 





U 
MOV SS2DAT , JRHCS3 aie INTO RH’ XA. 
MOV JRHCS3,SBDDAT  ;READ RHCS3 

BIS SETBIT,SGDDAT  ;SET BITS ALWAYS SET 








BIC CLRBIT, $GDDAT ?CLEAR BITS ALWAYS O 

CMP $GDDAT,SBDDAT : 

BEQ 8$ :BRANCH IF GOOD 

MOV RHCS3,$BDADR § :GET REGISTER ADDRESS 

ERROR 137 :2ERO WAS BEING FLOATED 
. S3 REGISTER 











;O0N READI 
:DID NOT CONTAIN WHAT 
WAS EXPECTED 








SEC 
ROL RS 
BCS S$ 












BIT BAN 


Rg AND READING OF ALL POSSIBLE BITS 
' -USE f My hy: OF WALKING 1°S (1,2,4,10 ETC) 
AND WALKING 0°S (-2,-3,-5 ETC) 

‘IN THIS TEST O BITS WILL NOT BE WRITTEN INTO 

























MAINDEC=11 -DERHAB-A 
DERNAS. SRO 


WIWJIGIGIOIG, CII GI 
RRR RRS 
Zon c.pe Nou Cc tahwe= ~ 


i Dat Pat fal Dat 


su 


tw 
3 Be 
1 ] L 


aanatattaty 
Bees 


woo 
oe 0-* 


Beeh 
Bae 


OoooooOO OHOOONOO 
20-20-20 = be Ob 0 8 
Brash 

Ree Seles 

Oooo NMOOQI000 

ST eras 

m 

“J 

oO 

wm 


turorurururur =o rururu 


Té 


pee st St ap 
--Tur 
Sale 
OSS 


104137 


MCYI1 E7( 732) 
ait SANG Ric 


co40&e2 


O16? 


oo40&2 


OO46S6 


001110 
001124 
001140 
171154 
171140 
001126 
001124 
001ie6 


001122 


22-SEP-76 


© SSSSLSESSSSSSERSESSSSSSSSRASSSSAFSSFSSSSERSSSSESSESLSSSSL ASSES SSAA GSSSS 
tT: SCOPE 
MOV aSTACK, SP sRESET STACK 
MOV a6, J8TSTNM :SAVE TEST NUMBER 
ISR PC, J@CLDISK GIVE RH, INITIALIZE 
:CLEAR RHWC AND FUNCTION BITS IN RHCS! 
MOV 80,WRTBIT ARE BITS NOT WRITTEN INTO 
MOV #0! eft BIT ARE BITS ALWAYS SET 
sFLOAT 1°S THRU THE RHWC REGISTER 
MoV acs % PERR 3S I oor ON ERROR AQORESS 
MOV TTING READY Y TO FLOAT A ONE 
18: MOV Re" §GDDAT START W 
SIC 80. $GDDAT CLEAR BIT 5 hel WRITTEN INTO 
23: BIT ebtTisieiraaite, SWR -ARE SWITCHES 14 OR 9 OR @ SET 
BEQ H IF ANY te 
SIs #CLR, IRHCS2 GIVE CLEAR FO FOR SCOPE 
38: MOV $GDDAT, DRHWC 420©=0s S WRITE RHWC REST STER 
MOV DRHWC. $BODAT = ;READ RHWC REGISTER 
BIS SETBIT,$GDDAT :SET ALWAYS SET BITS 
Co $200AT, SEDDAT jo eee 
MOV Rau, $2DAOR iE a eis es 
ERROR 137 
° 24 RHWC 
ON BeAOTNG. Ae ne TER 
:IT DID NOT CONTAIN’ AMAT 
: [WAS EXPECTED. 
4S: cLe :CLEAR CARRY ! 
ASL RS -GET 1 ONE LEFT 
gcc 13 *SRANCH IF IS NOT DONE 
sFLOAT A ZERO THRU RHWC REGISTER. 
MOV #6$, SLPERR :SET LOOP SACK POINT. 
MOY 817°776 RS :GET READY..TO FLOAT A ZERO 
S3: MOV RS, SGDOAT GET REROY TO WRITE DAT 
BIC :CLEAR BITS NOT een INTO 
6S: BIT agtisieir9!erT9: or iAPe SWITCHES 14 OR 9 OR 3 S=7 
BEQ ? H IF ANY OF THE ASOVE SET 
MOV #CLR, JRHCS2 sCLERR FOR SCOPE AID TO 
73: MOV SGODAT, JRHWC SWRI re Peo Bae RH" a. 
MOV JRHWC.$BDDAT = :READ RHWC 
Bis  SETBIT,SGDDAT =; SET Bits ALWAYS SET 
CMP $GODAT;$8DDAT  :TEST 
BEQ ag *BRANCH IF GOOD 
MOV RHWC , SBDADR : GET REGISTER ADDRESS 
ERROR 137 ; ZERO WAS BEING FLOATED 


15:11 PAGE 81 


07 


ISTER 
ON READING IT BACK IT 
















DERHAB. SRC 


4028. 
4023 012026 
4030 013034 
4031 913040 
4032 013044 
4033 013052 
4034 013060 
4035 013062 
4936 

4037 013070 
4032 013076 
4023 013104 
4050 O13ii2 
4041 013120 
4042 013126 
4043 013130 
4044 013136 
4045 

446 

4047 


NAINOEC=11-DERHAB-A 


004737 


0 
104137 


091900 
000007 
040312 


65000 
000001 


001124 
CO40E4 


CO4ESE 


poweed 
O4E5¢ 
004654 


001110 


001124 
001140 
171900 


170766 
00 


001126 
001122 


ie ee ee we: 


$ét7, 


18: 
es: 


33: 


22-SEP-76 15:11 


ee are cee ek ee 


s ELSAKLFLAEFLLELSLESSLARALSL SALE FSALLALARFLELAALAAATELRASLALAF EAE 
SCOP! 





PAGE 82 






;D1D NOT CONTAIN WHAT 
WAS EXPECTED 







BIT BANG RHBA 


TEST LOADING AND READING OF ALL POSSIBLE SITS 
IN RYBR REGISTER. 

USE A PATTERN OF WALKING 1°S (1,2,4,10 ETC) 
AND WALKING 0°S (-2,-3,-5 ETC) 

IN THIS TEST O SITS WILL NOT BE WRITTEN INTO 
AND 9 BITS WILL ALWAYS BE SET 
AND BITOO SITS WILL ALWAYS BE CLEARED 

CH OR 50k § ARE SET FOR DESUGGING 









y 






MOV sSTACK, SP ;RESET STACK 
MOV 87, 8TSTNM :SAVE TEST NUMSER 
ISR PC, J@CLDISK Eacdt RH yt IAL Ize 
CLEAR Raiic @ND FUNCTION BITS IN RHCS! 
MOV : (WRB T 





O eRe Bite Nor. NOT wert N INTO 
MOV ,SETBIT 

MOV #81700" CLREIT :BITOO ARE Bits. ReMaYS CLEARED 
;FLOAT 1°S THRU THE RHBA REGISTER 









Mov #2$, SLPERR ;SET roo? ON ERROR ADDRESS 
MOV 81,R5 GETTING READY TO FLOAT A ONE 
MOV RS. $0087 :START WITH 
BIC GODAT : CLEAR BITS NOT WRITTEN INTO 
BIT sot tint BITS!BITS" SWR :ARE SWITCHES 14 OR 9 OR 9 SET 
BEQ . :B IF ANY ONE SET 
BIs #CLR, JRHCS2 ‘GIVE CLEAR FOR SCOPE 
:SYNC I EB 







MOV SGODAT, 2RHBA =: WRITE RHER REGISTER 
MOV aRHBA $80DAT § ;READ RHBA ER 

BIC RBIT,$GDDAT CLEAR Suave’ CLEARED SITS 
BIS geee tT? Hadith SET ALWAYS SET SITS 

CMP SGDDAT $BDDAT 

BEO 4g t BRANC F G90 

MOY RHBA, SBDADR :GET Seater R ADDRESS 
ERROR 137 : EING FLOATED 





:0 ACK 
:IT DID NOT RONTATN WHAT | 





MAINDEC<11-DERHAE-8 MACYL1 27(732) 
DERHAB. SRC. 1? SIT SANG RBA 
Ne 1214 4 
doe pistds Bbesad 
4051 O13144 103335 
4052 
4053 
4054 
4055 O13146 Ol2737 O13172 001110 
SS HEE HEE bie 
ri t 
wee isies Biers: sina Bor iad 
‘ 4 
Goes Bias08 D8i463 : 
apes Cise02e Ole777 O0004O 170660 
$083 013210 013777. 001124 170646 
4064 Ol32lé 017737 170642 001126 
4065 012224 053737 O0%65e 01124 
S086 Ol3e32 042737 OO4SS4 OO0lle4 
4067 013240 O23737 OO11le4 OO0l1e6 
4068 O1224%6 001404 
$083 013250 013737 OO4064 OoOll2e2 
4070 012256 104137 
4071 
4072 
$07 
4974 
4075 
4076 013260 00026! 
4077 Ol3e6e 906105 
4078 O13264 103735 
4079 
4080 
$081 
4082 
4083 
4084 
4085 
4S85 
4087 
4088 
4589 
4090 
4091 
4092 
4093 
4034 
4095 
4096 
| 4097 0132 oocos4 
40398 013270 Ql270&6 001000 
me 013274 012737 OO00010 OO46Ssé 
4101 013302 004737 o403le 
4102 


22-SEP-76 15:11 PAGE 83 


eS ey "SHAS EXPECTED. 
: BEL RS | che 1 ONE LEFT 
gcc 18 ’ BRANCH IF 16 NOT DONE 
sFLOAT A ZERO THRU RHBA REGISTER. 


MOV nya: :$E7 LOOP BACK POINT. 7 
MOV RS, $6 BA x ger READY 8 RITE B ats 


Ss: MOV TO 
BIC 3» gen0at ;CLEAR BITS NOT TRETTEN INTO . 
6$: BIT #BiTi4! BITS!SITE, SWR ;ARE SWITCHES 14 OR 9 BR SET 


9&0 a :BRANCH IF ANY OF THE ABOVE SE 
MOV ohana: CLEAR FOR SCOPE AID TO 
YNC_ IF IN DEBUG 


$GDDAT, SR SURTTE INTO RH’XA. 
MOV ey T Bhnee *READ RHBA 
SETBIT,$ SODDAT $3] pits ALWAYS SET 


SIS 
BIC CLRBIT, $GDbAT _ ICLEAR BITS ALWAYS 0 
CMP SGODAT, SSDDAT :CeEGR 
SE $ - }BRANCH IF GOOD 
MOV RHBA, SDADR :GET REGISTER ADDRESS 
ERROR 137 :ZERO WAS BEING FLOATED 
: THRU RHBA REGISTER 
[ON READING IT BACK : 
:DID NOT CONTAIN W 
;WAS -EXPECTED 
S$: ec C- 
ROL RS 
ess S$ 


. ; RESRRAELALAREL ALA ALAA LAL ALA LLL ALARA L ARAL ALA AARA ALLL ETAL LALTAELE 
&TEST 10 BIT BANG RHBAE 


+% TEST LOADING AND READING OF ALL POSSIBLE BITS 
ie IN RHBQE REGISTER. 
ie USE A PATTERN OF WALKING. 1 {te 2,4,10 ETC) 
ti BND WALKING O°S_(-2,-34- 
:# IN THIS TEST 177700 ‘pits: WELL NOT BE WRITTEN INTO 
i AND 0 BITS WILL ALWAY ET 
:# AND 177700 BITS WILL ALWAYS BE CLEARED 
# IF SWITCH 14 OR 9 OR 8 ARE SET FOR DEBUGGING 
+ THEN A RH CLEAR (RHCSe BIT #S) WILL BE 
# GIVEN TO AID SCOPE SYNCS ON THE CLEAR 
:# SIGNAL. 
Oy age = eh emanated ree becca esse cl Seeing HE a HN 


+r 10: 
oy aSTACK, SP sRESET STACK - 
MOV #10, a8TSTNM :SAVE TEST NUMBER 


JSR PC, d8CLOISK ;GIVE RH INC TTAL Ze 
SETUP UNIT 


UBER 
;CLEAR RHIC AND FUNCTION BITS IN RHCS1 



















eek eek oe tah MACYL1 27(732) 
DERHAB. SRC T10 BIT SANG RHBAE 


3306 012737 177700 004650 


bis73> TPP700 Doses 


£££ 

0-- bp 

Bor 
oon 
RT 
ez 


4109 
4110 913330 Ole737 4 001110 
sii Bisse G15705 Bidets 
411 1 fi 

3 1S Seer3e 177760 oo1124 
4114 013354 032737 041400 001140 
Wiig 013369 082777 00040 170476 
4117 
4118 013372 013777 001124 170530 
4119 B30 tee T0854 001126 
4120 013406 043737 904654 001124 
4121 013414 053737 OO0465e 001124 
4lee O13422 023737 O01le4% 001126 
4l23 013430 901404 
4124 Q1343e 013737 04130 O0llee 
4125 O13446 104137 


4128 
4129 
4130 013442 O00241 
4131 O13444 006305 
4132 O13446 103335 





4135 

4136 O134S0 0912737 013474 001110 
4137 013456 012705 177776 

4138 013462 019537 001124 

4138 013466 042737 177700 001124 
4149 O13474 032737 O41400 OCO1140 
4141 013502 901403 

4145 012777 O00040 170356 


3512 013777 001124 170410 
4145 3520 017737 170404 001126 
4146 3$26 004 001124 


S42 023737 O0i1le4 O01126 


3552 013737 004130 OOli2e 
3560 104137 


s 
£ 


RT ATATAT AT AT AT 
Ww 
<= 
oOo 
£ 
WwW 
NN 
Wu) 
NN 
i=) 
oOo 
< 
o 
wn 
£ 
=) 
oO 
-_ 
— 
tw 
£ 


C13S6e cO0e6! 
4158 013564 006105 
013566 103735 


1$: 
es: 


3$: 


4$: 


S$: 
6S: 


73: 
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MOV #177700 ,WRTIBIT 


NOV ee 


ars 
3$ 
81S #CLR, JRHCS2 


CMP ScODAT, $8DDAT 
MOV RRBAE, $BDADR 
137 


CLC 
ASL RS 
BCC 1$ 


;FLOAT A ZERO THRU RHBAE REGISTER. 


MOV #63, SLPERR 
MOV a 177776 RS 


$6) 
BIC Niteaa obs $GDDAT 


BIT aeirisiBiTsis1Te, Su Su 


MOV 4cLR, JRHCS2 
MOY S$GDDAT , JRHBAE 
BIS SETBIT. SGDDAT 
BIC CLRBIT, SGDDAT 

CMP SGODAT, SBPDAT 


MOV RHBAE , SBDADR 
ERROR 137 


ead 1°S_ THRU THE RHBAE REGISTER 
LPERR 


Re, Sapa $GDDAT iSTeRT Witte Rot NOT A URITTEN INTO 
BIT #B1T14!6179!B178, SUR SWR : ARE SUITCHES 14 OR 9 OR 8 SET 











3177700 ARE BITS NOT WRITTEN INTO 


+0 865 PAs erie. Lins CLEARED 






HGETTING READY TO FLORT A ONE 






R 
iGIVE CL m7 FOR SCOPE 


EGISTE 
;CLE WAYS CLEARED BITS 
SET ALWAYS SET BITS 









30 

ON READING RHBAE BACK 
;1T DID NOT CONTAIN WHAT 
WAS EXPECTED. 

:CLEAR CARRY 

:GET 






1 ONE LEFT 
;BRANCH IF 16 NOT DONE 












:SET LOOP BACK POINT. 
:GET READY TO FLOAT A ZERO 
:GET READY TO WRITE DATA 
; CLEAR BITS NOT WRITTEN INTO 
“ARE SWITCHES 14 OR 3 OR 9 SET 
aNcH IF ANY OF THE ABOVE SET 
‘CLEAR FOR SCOPE AID TO 
;SYNC_IF IN DEBUG 7 
sHRITE INTO RH XA. | 


HBA 
SET its ALWAYS SET 
es BITS ALWAYS 0 










WAS EXPECTED 














Baatoadz 


acw$§ 
fue 


4183 
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DERHAB. SRC T Pf G 


° We i OC Oe ie ee Be Oe Dh Oe Oe oe 


; 
MOV 
JSR 


eLR 


HAT 
RHoS2 
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Fh ilk tld +a a1 lll 


iATEST “RETER p Re cenR 18 GPVEN“ Ser a aS TN RH 


RHCS2 IS CHECKED TO HAVE “Re (BIT #6) 


ea 


CALLE 


APPROPIA 


BIS 


MOV 
CMP 


BEQ 
ERROR 


BIT 
D “WAT” 
stor y's IF “OR” DOES oft SET UETHIN “WAT” COUNT 


R WITH UN 
D OF ALL 


DOWN AN ERROR IS REPO 
RHOB TOE BE ch KHeEKED Ae TQ CONTAIN ZEROS 


EY 


ALUES 


#STACK, SP 


65$ 
6 


‘ gli. aatSTNm 
PC, J#CLDISK 


+ CHECK THAT RHCS2 HAS IR 
MOV GDDAT 
UNIT. $GDDAT 


@RHCS2, SBDDAT 
SGDOnT, $BDDAT 





Eb ROS Te WRITTEN INTO RHDB 


#7) IS WAITED FOR BY . TRAP INSTRUCTION 
(NO TIMING 


RHCS2 W HAVE “IR” AND UNIT NUMBER 
RHCS1 RHEeS RHBA, RHBAE,RHWC, WILL BE CHECKED TO HAVE 


[eesansnecunesnnenacenseananessnesiesaaetanenanesaneaaatenseens 


;RESET_ STACK. 
:SAVE TEST NUMBER’ 


;GIVE RH a 
:SETUP UNIT NUBER 
;CLEAR RHWC AND FUNCTION SITS IN RHCS1 


T GOOD = 100 
* INCLUDE UNIT NUMBER 


;READ ie Em COMPARISON 
:COMPARE EXP 
;DA TA _WITH BATA READ FROM 


H 
BRANCH IF GOOD 


;AFTER SETTING CLR_BIT #5 

IN RHCS2 TO INIT THE RH 

AND HAVING DONE NOTHING ELSE 
g RARE SHOULD HAVE IR 


TOGETHER WITH UNIT NUMBER 
:BUT CONTAINED WHAT IS 
GIVEN IN BAD RHCS2 


;WRITE ONE WORD OF ALL ZEROS INTO _RHOB 
dRHDB ;WRITE O IN RHOB 


;WAIT FOR OR BIT IN mucs2 [REGISTER TO SET 
TQ WAIT.T SUBROUTINE 
AND. WAIT FOR OR BIT IN’. 









4242 013704 

013704 

4245 013712 
46 


4247 013720 
4248 O0i37e6 





4251 013734 


ases 013740 
4264 013740 
4266 013746 
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DERHAB.SRC 


42Se 013736 


4267 013754 


4270 013762 
013764 


Tll 


424 013884 000200 
B17 ? 


012737 


017737 
023737 


eRe 


012737 
017737 
023737 


001401 
104011 


oooces 9001124 


170212 901126 
OClle4% O0lie6b 


p0100 
005010 


170144 
001124 


004200 


170106 
001124 


1 27(732 
SLO. E51 1 ( 


001124 


oo1124 


001126 
001126 


001124 


001126 
001126 


) 
ONE 


675: 


69S: 


22- 
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WORD 


WRITE) 


BFO=Cfs«ég9S:~=Ss—i‘<‘é~—sCBRANCH IF GOOD o's 
ERROR 10 2.’ 
;0FTER CLEARING THE RH EY 


BEG 
ERROR 11 


G07 







OR " ;RHCS2 REGISTER : v 






a ) TIM S ante 
Tas THAN jf MILLISE ONOS 






;CHECK THAT py HAS 0 






MOV «#0, SGDDAT GET GOOD = 

MOV DRHDS,SBODAT  § ;READ RHDB FOR COMPARISON A 

CMP S$GDDAT,SBDDAT  :COMPARE EXPECTED \ 
;DATA WITH DATA READ FROM \ 






BEQ &7$ ) : BRANCH IF GOOD 


ERROR 7 
;AFTER CLEARING THE RH " 
3K WRITING ALL ZEROS 


THEN READING IT BACK | 
; RHOB SHOULD HAVE 0 


But CONTAINED WHAT 1s ' 
;GIVEN IN BAD RHDB o 










SCHECK THAT RHCS2 HAS IR | i 
Moy #IR, $GDDAT ;GET GOOD = 100 | 
BIS UNIT. $GDDAT ‘INCLUDE UNIT NUMBER 
MOV JRHCS2,SBDDAT  ;READ RHCS2 FOR COMPARISON vat) eg 
CMP $GDDAT,$BDDAT  :CO . 1 

;DATA WITH DATA READ FROM ~ 















me ie ITING ALL ZEROS 
NTO RHDB 


: THEN READING IT 
;RHCS2 OULD HAV R 


{TOGETHER WITH UNIT NUMBER 
3BUT CONTAINED WHAT IS 
;GIVEN IN BAD RH ese AS 


;CHECK THAT RHCS1 HAS DVA!IRDY ma 
Mov #DVAIRDY,SGDDAT ;GET GOOD = 4200 


MOV MRHCS1,$B8D0DAT ;READ RHCS1 FOR COMPARISON 
CMP SGDDAT,$BODAT  ;COMPARE EXPECT 
;DAT A WITH DATA READ FROM 


S 
BRANCH IF GOOD 










71$ 





MAINDEC-11-DERHAS-A 


DERHAB. SRC 


014014 
014014 


B1¥530 


014036 
014040 


014042 
014042 
014050 
014056 


3 -O14064 
014066 


Tl 


012737 


017737 
023737 


001401 
104012 


012737 


177, 
3737 


001401 
104013 


012737 
017737 
023737 


001401 
104014 


001124 


001126 
001126 


000000 001124 


170054 O01i26 
001124 O011e6 


758: 


HO7 


5:11 PAGE 87 


aa CLEARING THE RH 
wad TANG ALL ZEROS 

:IN 

; THEN READING IT BACK 

sRHG SHOULD HAVE DVA!RDY 


e 
BUT CONTAINED WHAT IS 
GIVEN IN BAD RHCS1 


:CHECK THAT RHCS3 HAS 0 
Mov #0, SGDDAT ;GET GOOD = 0 


MOV @RHCS3,$BDDPT  ;READ RHCS3 FOR COMPARISON 
CMP S$GDDAT; $BDDAT ; COMPARE EXPECTED 
;DATA_ WITH DATA READ FROM 


BEQ 738 ane IF GOOD 


ERROR le 
;AFTER CLEARING THE RH 
sn WRITING ALL ZEROS 


NTO 

; THEN READING IT BACK 
RHCS3 SHOULD HAVE 0 
BUT CONTAINED WHAT IS 
GIVEN IN BAD RHCS3 


:CHECK THAT RHBA HAS O 
Mov #0, SGDDAT ;GET GOOD = 


MOV "@RHBA, SBDDAT ;READ RHBA FOR COMPARISON 
CMP $GDDAT,SBDDAT  ;COMPARE EXPECT 
;DATA WITH DATA READ FROM 
75$ . BRANCH IF GOOD 


BEG 
ERROR 13 

seer F ines THE RH 
ALL ZEROS 


aN oR 
; THEN READING IT BACK 
;RHBA SHOULD HAVE 0 


‘BUT CONTAINED WHAT IS 
;SIVEN IN BAD RHBA 


:CHECK THAT RHBAE HAS 0 
MOV #0, SGDDAT ;GET GOOD = 


MOV @RHBAE,SBDDAT ;READ RHBAE FOR COMPARISON 


CMP SGDDAT,SBDDAT  ;COMPARE EXPECTED 
;DATA WITH DATA READ FROM 


*RHB 
77$ sBRANCH IF GOOD 


BEQ 
ERROR 14 

;AFTER CLEARING THE RH 
3 :AND URETING ALL ZEROS 










MAINDEC-11-DERHAB-A ng fe 4 te? be tote SEP- 
DERHAB. SRC T1l SILO TEST 








4328 THEN READING IT BACK Poet: 
4329 | | ;RHBAE SHOULD HAVE 0 ry 
re | {BUT CONTAINED WHAT IS i 
43 : SGIVEN IN BAD RHBAE | 






4333 014970 778: 
isa pen Ne THAT "scpbar 0 










1338 014070 012737 o00000 001124 ;GET GOOD = 

4337 O14O7E 917737 MOV SBDDAT  §;READ RHWC FOR COMPARISON 
33g 14104 abas35 081 {88 Bot tse 6 CMP as * Kt SBDDAT :COMPARE EXPECTED 

4333 sara WITH DATA READ FROM 
4341 O14112 OO1401 BEQ° ss 798 :BRANCH IF GOOD 

4342 014114 ‘104015 . ERROR 15 

4343 CC AFTER CLEARING THE RH 
4344 ; AND WRITING ALL ZEROS 
4345 +N NTO RHDB 

4 ; HEN READING IT BACK 

4 jae SHOULD HAVE 0 





348 
yaug :BUT CONTA D MHA WHAT IS 
4350 :GIVEN IN 






4351 O14116 | 738: 





35 
4355 $ 1 et ae Ta eee 
4356 | ; ATE LO: 2 (ONE WORD WRITE) 

4357 16 TER A RH CLEAR IS GIVEN (SET BIT #S IN RHCS2) 





4358 + RHCS2 IS CHECKED TO HAVE “IR™ (BIT #6) HIGH ‘ 
4359 1% TOGETHER WITH UNIT R x4. 
#360 i NE WORD OF ALL ONES IS WRITTEN INTO RHOB 

4365 i "OR" (BIT #7) Is WAITED FOR BY A TRAP INSTRUCTION 

4363 1 CALLED “WAT™ (NO TIMING IS DONE) 

4264 i HOWEVER IF “OR" DOES NOT SET WITHIN “WAT” COUNT 

4365 * DOWN AN ERROR IS REPORTED 

4366 1% RHDB IS READ AND CHECKED TO CONTAIN ALL ONES 

4367 * RHCS2e WILL BE CHECKED TO HAVE "IR" AND UNIT NUMBER 

368 it RHCS1 RHCS3,RHBA,RHBAE,RHWC, WILL BE CHECKED TO HAVE 

4369 APPROPIATE VALUES 







4370 [seAeenenaetaneaeateaTneeneneaneananeneenienananeneanenton 

4371 014116 oO0004 ares SCOPE 

43 14120 012706 001000 MOV #STACK, SP ;RESET STACK 

4373 014124 0612737 O000l2 oo4ese MOV #12, a8TSTNM SAVE TEST NUMBER 

4375 014132 004737 o40312 JSR PC, J¥CLDISK ;GIVE RH INITIALIZE 

437 -SETUP UNIT NUBER 

43 *CLEAR RHWC AND FUNCTION BITS IN RHCS1 







; - sCHECK THAT RHCS2 HAS IR . 
4381 O14136 012737 000100 001124 Mov #IR, SGDDAT GET GOOD = 100 
4382 O14144 0537327 O0S010 O01124 BIS UNTt $GDDAT ‘INCLUDE UNIT NUMBER 








JO? 
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DERHAB. SRC ‘Tle SILO TEST 2 (ONE WORD WRITE). 
4384 014152 017737 167712 901126 MOV ORHCS2,$BD0AT — ;READ RHCS2 FOR COMPARISON 
4385 O14160 023737 001124 O01126 CMP $GDDAT, SBDDAT ‘Bae EXPECT ED. 
4 ; TA WITH DATA READ FROM 
ay ONS Sin saminda 
4383 AFTER SETTING CLR BIT #5 
433 $I Pais TO INT TH A ce 
4335 ie ty HAVE IR 
4394 ssh m 
4395 TOGETHER WITH UNIT NUMBER 
4396 *BUT CONTAINED WHAT IS 
4 GIVEN IN BAD RHCS2 
4338 014172 65S: 
4400 :WRITE ONE WORD OF ALL ONES INTO RHDB 
4401 014172 012777 177777 167702 Mov #177777,0RHOB ;WRITE 1 IN RHOB 
au08 :WAIT FOR OR BIT IN. RHCS2_ REGISTER TO SET 
4404 014200 104411 HAT “TRAP TO WAIT.T SUBROUTI 
44OS O1420e pougro RHCS2 OND WAIT FOR OR BIT IN 
4408 14204 00 OR :RHCS2 STE 
44d :; : IF ERROR HE 
4408 :IT MEANS "OR" DID NOT 
4409 ;SET FOR THE FULL COUNT 
. 44I0 DOWN OF THE WAIT.T SUBROUTINE 
441i ‘THIS TIME IS APPROXIMATELY 
44 LARGER THAN SOO MILLISECONDS 
4414 
4415 :CHECK THAT RHDB HAS 177777 
HH Oi4206 012737 177777 001124 MOV #177777,S$GDDAT ;GET GOOD = 0 
4418 014214 017737 167662 001126 MOV JRHDB,SBDDAT  § ;READ RHDB FOR COMPARISON 
4419 014222 023737 OO112e4 001126 CMP $GDDAT,SBDDAT  ;COMPARE EXPECTED 
4450 :DATA WITH DATA READ FROM 
445] ? RHDB 
4452 014230 001401 BEQ 675 :BRANCH IF GOOD 
4423 014232 104007 ERROR 7 
444 AFTER CLEARING THE RH 
44d ‘AND WRITING ALL ONES 
4426 INTO 
4457 ‘THEN READING IT BACK 
4458 *RHDB SHOULD HAVE 177777 
4499 BUT CONTAINED WHAT IS 
4430 , GIVEN IN BAD RHDB 
4431 014234 67S: 
4432 ; :CHECK THAT RHCS2 HAS IR 
4433 014234 012737 O00i00 001124 MOV #IR,SGODAT  - ;GET GOOD = 100 
4434 O:4e42 053737 OOS0t0 O01124 BIS UNIT” $GDDAT ‘INCLUDE UNIT NUMBER 
4436 014250 017737 167614 001126 _ MOV DRHCS2,F3DDAT  ;READ RHCS2 FOR COMPARISON 
4437 014256 023737 001124 onli>6 CMP $GDDAT;$BDDAT  :COMPARE EXPECTED 
4438 ‘DATA WITH DATA READ FROM 


4439 :RHCS2 






KO7 
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DERHAB. SRC Tle SILO TEST 2 (ONE WORD WRITE) 








4440 014264 001401 BEQ 69S ;BRANCH IF GOOD 

oa Oi4266 104010 ERROR 10 ER CLEARING THE RH 
448 HAN URETYNG ALL ONES 
4445 STEN READ 

44 gRUESe SHO SHOULD MAVE IR 

444 

4448 ; TOGETHER WITH UNIT NUMBER 
4449 BUT CONTAINED WHAT IS 
4450 :GIVEN IN BAD RHCS2 
S451 014270 698: 

yy ;CHECK THAT RHCS3 HAS 0 







014270 012737 oOo0000 001124 Mov #0, SGDDAT :GET GOOD = 









4455 014276 017737 167630 001126 MOV @RHCS3,S$BDDAT  ;READ page ate COMPARISON 
4456 014304 023737 O011e4% OOl1eé CMP $GDDAT,$BDDAT  ;COMPARE EXP 
4457 DATA WITH BATA READ FROM 







;RHCS3 
4459 O14312 00140 BEG 715 ;BRANCH IF GOOD 
4460 O14314 10401 ERROR ile 
4461 ; AFTER CLEARING THE RH 
WHEE; ;AND WRITING ALL ONES 
4463 ' NTO RHDB 
4464 THEN READING a BACK 
wate RHCS3 SHOULD HAVE 0 
















4467 \ 1S CONTAINED WHAT IS 
4468 :GIVEN IN BAD RHCS3 

4469 014316 71S: ° 

4479 -CHECK THAT RHBA HAS 0 

mnie 014316 012737 o00000 001124 MOV #0; SGDDAT :GET GOOD = 

4473 014324 017737 167534 001126 MOV JRHBA SB0DAT | ;READ RHBA FOR COMPARISON 

4474 014332 023737 001124 O01126 CMP $GDDAT, $B :C0 T 

4475 ‘DATA WITH DATA READ FROM 

4476 ; ;RHBA 

4477 014340 001401 BEQ 73$ *BRANCH IF GOOD . 

4478 014342 104013 . ERROR 13 

4479 s AFTER. CLEARING THE RH 

4480 ‘AND WRITING ALL ONES 

4481 . s INTO RHOB 
4482 - THEN READING IT BACK 

4483 ; RHBA SHOULD HAVE 0 ; 
444 iY 
4485 ey: BUT CONTAINED WHAT IS 

44BE >GIVEN IN BAD RHBA 

4487 014344 ‘ 73S: 

4498 -CHECK THAT RHBAE HAS 0 

1483 014344 012737 OO0000 001124 Mov #0, SGDDAT ;GET GOOD = 







4491 O143S52 017737 167552 001126 MOY JRHBAE , SBODAT ;READ st FOR COMPARISON 
4492° 014360 023737 001124 O011c6 CMP $GDDAT,$BDDAT  ;COMPARE EXPECTE 
4493 DATA WITH DATA READ FROM 









; RHB 
;BRANCH IF GOOD 








4495 014366 001401 . BE 75$ 
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DERHAB. SRC Tl2 SILO TEST 2 (ONE WORD WRITE) 


449 014370 104014 ERROR = 1” AFTER CLEARING THE. RH 
BRIN ALL ALL ONES 


4201 EOE pave O 


45 
4503 BUT CONTAINED WHAT IS 
#3 nA GIVEN IN BAD SHBAE 
014372 . 758: 
4506 “CHECK THAT RHWC HAs 0 
#507 014372 912737 o00000 001124 MOV #0, SGDDAT GET GOOD = | 
4509 GI4400 017737 167456 001126 MOV JRHWC , SBDD sREAD RHWC FOR COMPARISON 
4510 O14406 023737 O01124 O011c6 CMP $cDDAT SEDDAT *COMPARE EXPECTED 
#211 cal WITH DATA READ FROM 
Wet 014414 01401 BEQ 773 ‘BRANCH IF GOOD 
4514 014416 104015 ERROR 15 
4515 sAFTER CLEARING THE RH 
uS16 sAND WRITING ALL ONES 
4517 pal 
4518 ey READING IT BACK 
4529 ; RHC SHOULD HAVE 0 
4521 ‘BUT CONTAINED WHAT IS 
ySo2 GIVEN IN BAD RHWC 
4523 014420 778: 
dese 
4c © KEKRALKAKAKEL LAL LEKEFELAEKL EKA RELE SHREK AS SEEKER AKAKRAERRRE SSL HAEEEE 
nat kT TEST 13 SILO TEST 3 (TWO WORD WRITE) 
4529 :% AFTER A RH CLEAR IS GIVEN (SET BIT #5 IN RHCS2) 
4530 1 RHCS2 IS CHECKED TO HAVE "IR" (BIT #6) HIGH, 
4531] t TOGETHER WITH UNIT N 
4532 i ONE WORD = S2S25 IS WRTTTEN INTO RHDB 
4533 * RHCS2 IS CHECKED TO HAVE "IR" AND UNIT NUMBER 
424 1% A SECOND WORD = 12525 IS WRITTEN INTO RHDB 
35 * x "OR" (BIT #7 IN RHCS2) IS WAITED FOR BY A TRAP 
4536 * INSTRUCTION CALLED “WAT” 
4537 : x RHD AND CHECKED TO CONTAIN S2525 
4538 * RHCSe IS CHE CKED TO HAVE "IR". “OR™ AND UNIT NUMBER 
4539 x RHD 1 READ A SECOND TIME AND CHECKED TO 
4540 * x CON AIN 125252 
4541 * x RHCS2 IS CHECKED TO HAVE “IR” AND UNIT NUMBER 
_ 4bup + THEN ALL REGISTERS RHCS1, RHCS3, RHBA, RHBAE, RHWC 
443 ARE CHECKED TO HAVE APPROPIATE VALUE 
yous + i 
4S4E [PH Eerie eeieeeeineannne eerie 
4547 014420 O00004 ueens 
W548 O14422 012706 001000 Roy #STACK, SP RESET STACK 
4543 Oi4426 012737 O00013 oo4es6 MOV #13, a8TSTNM :SAVE TEST NUMBER 


4551 O14434 004737 040312 JSR PC, J#CLDISK ;GIVE RH INITIALIZE 






MAINDEC-11-DERHAB-A 
DERHAB. SRC T13 


4552 


4556 O1444O 012737 
nA 14446 053737 


45 
4559 O144S4 017737 
60 O14462 023737 


563 014470 901401 
4564 O14472 104006 


014474 012777 


4580 014502 104411 
4581 014504 004070 
; wees 014506 000200 


012737 
053737 


017737 
023737 


001401 
LO4O1E 


22-SEP-76 15:11 PAGE 92 
SILO TEST 3 ¢ tuo WORD WRITE) 


OS2S25 167400 


MO? 








;SETUP UNIT NUBER 
; CLEAR 


RHWC AND FUNCTION BITS IN RHCS1 


- CHECK THAT RHCS2 HAS IP 
MOV SDDAT :GET GOOD = 100 
BIS UNIT, $GDDA ‘INCLUDE UNIT NUMBER 


MOV @RHCS2,SBDDAT  ;READ wae FOR COMPARISON 
CMP SGDDAT, $BDDAT ie xPe GT ER. 
8. W 1 A READ FROM 


65$ BRANCH IF GOOD 


BEQ 

ERROR 6 
;AFTER SETTING 8 BIT #5 
IN RHCSe TO INIT RH 
SAND HAVING DONE NOTHING ELSE 


‘F100. SHOULD HAVE IR 


; TOGETHER WITH rH NUMBER 
BUT CONTAINED WHAT IS 
GIVEN IN BAD RuCSE 


;WRITE ONE WORD = S2S25 INTO RHDB 
MOV #5eSe5, JRHDB ;WRITE IN RHDB 


“WAIT FOR OR BIT IN RHCS2 REGISTER TO SET 
WAT TO WAIT.T SUBROUTINE 
RHCS2 ano. WAIT FOR OR BIT IN 
OR Pe REGISTER 

IF ERROR OCCURS SAB 


THIS TINE IS APPROXIMATELY 
; LARGER THAN SOC MILLISECONDS 


-CHECK THAT RHCS2 HAS IR!OR 
MOV #IR!OR,SGDDAT  ;GET GOOD = 300 
BIS UNIT T, SCDDAT ‘INCLUDE UNIT NUMBER 


MOV @RHCS2,S$BDDAT  ;READ RHCS2 FOR COMPARISON 
CMP $GDDAT,$BDDAT  ;COMPARE EXPECTED 
DATA WITH DATA READ FROM 


;RHCS2 
BEQ 67$ BRANCH IF GOOD 
ERROR 16 
jAF TER SETTING mw BIT #5 
HCS2 TO INIT THE R 


N RH 
Tey WRITING C2525" INTO 
;RHCS2 SHOULD HAVE IR!OR 
TOGETHER WITH UNIT NUMBER 
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DERHAB. SRC T13 SILO TEST 3 (TWO WORD WRITE) 











4608 ;BUT CONTAINED WHAT IS 
4609 : ;GIVEN IN BAD RHCS2 
4610 O14S44 67§: 






uete :WRITE A SECOND WORD = 125252 INTO RHDB 

#613 O14S44 012777 125252 167330 MOV #12°=52,RHDB ;WRITE 125252 INTO RHDB 

4615 ;WAIT FOR OR BIT IN RHCS2 PRESISTER TO SET 

4616 O145S2 104411 WAT RAP TO WAIT.T SUBROUTINE 
4617 O145S4 904070 RHCS2 OND WAIT FOR OR BIT IN 

4618 014556 000200 OR :RHCS2 REGISTE 

4619 IF ERROR. OCCURS HERE 

4620 -IT MEANS “OR” 

4621 sSET FOR THE Fue COUN 

4e32 “DOWN OF THE WAIT.T SUBROUTINE 
4623 THIS TIME IS APPROXIMATELY 
454 ; LARGER THAN SOO MILLISECONDS 






4625 
4626 ;CHECK THAT RHDB HAS S2SeS 
mi 314 O14S60 012737 O525eS o01124 HOV #525eS,SGDDAT ;GET GOOD = 0 










4629 O14566 017737 167310 001126 MOV @RHDB , SBDDAT ;READ RHDB om COMPARISON 
4630 014574 023737 001124 001126 CMP ScDDAT, $BDDAT  ;COMPARE EXP 
4631 2 :DATA WITH DATA READ FROM 







4632 : RHDB 

4633 014602 001401 BEQ 69$ BRANCH IF GOOD 

4634 O14604 104017 ERROR 17 

4635 oF SENG oe RH_THEN 








4641 i GIVEN IN BAD RHDB 
Wo4e O14606 69S: . 
4643 ; CHECK THAT RHCS2 HAS IR!OR 

4644 014606 012737 000300 001124 MOV #IR!OR, SGDDAT  ;GET GOOD = 300 
4E4S 014614 053737 005010 001124 BIS ‘UNIT, S$GDDAT ; INCLUDE UNIT NUMBER 











4646 

4647 Ol4622 017737 167242 001126 MOV @RHCS2,S8DDAT ;READ ne oo COMPARISON 
4648 014630 023737 001124 001126 CMP $GDDAT,$BDDAT  ;COMPARE EXP 

4649 .. DATA WITH BATA READ FROM 
4650 : RHCS2 

4651 O14636 001401 BEQ 71$ _ }BRANCH IF GOOD 

4652 O1464O 104020 ERROR 20 

4653 ; AFTERCLEARING THE RH_THEN 
4ES4 ;WRITING TWO WORDS INTO 
4ESC RHDB S2S25 ND 12525 
4655 ; THEN READING RHDB ONCE 
4657 F pRHE Se SHOULD HAVE IR!OR 






4658 0 

4659 TOGETHER WITH rt NUMBER 
4660 i108 CONTAINED WHAT IS 
4661 GIVEN IN BAD Rucse 






WEbe Oi4642 718: 





a “3a8 


o14724 
o14724 
014732 
014740 


OLS74e 
014750 


"gatas A 


i2S2eS2 001124 


lgre26 90:12 


OOile4 OOlie 


do4200 O0ile4 


167122 001126 
OCile4% OOlleé 





-_—-~ «-- 
-<=-—-=— 


753: 


* RESO RHOB m SE-OND 
TA” 2uns mS 


geet -7* aT 


rata | $8008 T 


‘gee THAT RHCS2 — IR 
$60 


8IR, $GODAT 
UNIT. $GODAT 
DRHCS2 , SBDDAT 
$GDDAT, S8DDAT 


73$ 
22 


ME 
{2525 


. --. 
> o-oo r 
‘ee. 1 
a os on ne 
a“ - . 
ss oe woe 


mi) 
I 


P 
“aut 


FPR BPR Re 


iat ek ty +35 
;GIVEN IN gia RHE 


;GET GOOD = 100 
SINCLUDE UNIT NUMBER 


READ RHCS2 ER COMPARISON 
; COMPARE EXPECTED 
:DATA WITH DATA — FROM 


H 
: BRANCH IF GOOD © 


;AFTER CLERAING RH THEN 
sWRITING TWO WORDS INTO 
:RHDB SeS25 AND 125252 
: THEN Remy UNG RHOS THE 
;SECOND TIME 

:RHSSe SHOULD HAVE IR 


‘TOBE THER WITH UNIT NUMER 
;BUT CONTAINED WHAT IS 
GIVEN IN BAD RHCS2 


1 ae THAT RHCS! HAS DVAIRDY 


sDVAIRDY,SGODAT ;GET GOOD = 4200 


@RHCS1, SBODAT 
$GDDAT; $80DAT 


77$ 
141 


;READ RHCS1 4 COMPARTSON 
COMPARE EX 

sDATA WITH BATA READ FROM 
BRANCH IF GOOD 


;AFTER CLEARING RH THEN 


*WRITING TWO WORDS INT 
;RHOB SeS2S AND 125252 
3 THEN READING RHDB 
SECON 


OD TIME 
sRHCS1 SHOULD HAVE DVA!IRDY 













DERHAS. SRC 


a as 


al Ss Tae 


13 


012737 


LEE 


301401 
104142 


* 012737 


017737 
023737 


MACY11 7 (732) 


TL0 TEST 3 (TWO WORD WRITE) 


oo0000 901124 


L6714s 001126 
001124 001126 


001124 


167052 001126 
OO11e4 OO0lileb 


o00coo 001124 


167070 001126 
001124 OOlle6 


Mov 


MOV 
CMP 


ERROR 


#0, 


@RHCS3, SBODAT 
$GDDAT, SSDDAT 


798 
142 


a 
$ 


RH 
ele) 


81$ 
143 


JRHSA 
$GDDA 


92$ 
144 


Hea 
DA 
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;CHECK THAT wae HAS 0 
mM $GODAT 


-CHECK THAT RHRQ HAS 0 
MOVs #0, SGDUAT 


$BODAT 
t, $2DDaT 


;CHECK THAT we HAS 0 
#0, $GDDAT 


, S8DDAT 
, SBODAT 


sRETER CLEARING RH THEN 
BRITING Tho mo 


;RHBA 
:BRANCH IF GOOD 


;GET GOOD = 0 


H 
t BRANCH IF GOO 









=4200 
BUT CONTAINED WHAT IS 
;GIVEN IN BAD RHCS! 







;GET GOOD = 0 

fy RHCS3 FOR COMPARISON 
;DATA_WITH DATA READ FROM 
;RHCS 

:BRANCH IF GOOD 













iE iN 
S AND 1 


GIVEN IN BAD RHCS3 






;GET GOOD = 0 


;READ RHBA FOR COMPARISON 
: COMPARE EXPECTED 
;DATA WITH DATA READ FROM 







sAETER CLEARING RH THEN 






HAVE 0 
ar cONTBIN D WHAT I: 
GIVEN IN BAD RHEA 







;READ RHBAE FOR COMPARISON 
; COMPARE EXPECTED 
sDAT A _WITH DATA READ FROM 







sAETER CLEARING RH THEN 
f+ 8.7 TWO WORDS INTO 

ae AND 125252 
‘TaN Nott NG RHD8 THE 


Brea SHOULD HAVE 0 
+ EONTAINED WHAT IS 
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DERHAG . SRC SILO TEST 3 (TWO WORD WRITE) 








uo : ""sGIVEN IN BAD RHBAE 
pe o1scs4 83$: 

4773 ,CHECK THAT RAM HAS 0 

4773 O1S0S4 012737 900000 O01124 hoy 80, SCDDAT .GET GOOD = 0 - 







4781 O15S0S2 OL7737 LSS774 001126 MOV DRHWC,SBODAT  § ;READ RHWC FOR COMPARISON 
4782 015070 023737 O01124 001126 CMP 6s $GDDAT,$BDDAT :¢ CTED 

4283 . sDRTA WITH DATA READ FROM 
4785 OISOTE 00140: BEQ 95$ ‘BRANCH IF GOOD 

4786 O15100 104145 ERROR 145 . 

4787 sAETER CLEARING RH THEN 






47a | ISIVEN IN BAD RHWC 
y795 015102 ess: 









4798 : ais Els tat 6 itaee ee eee 
4733 - tRTEST 14 SILO TEST 4 (COUNT PATTERN 

4801 3% AFTER A RH CLEAR IS GIVEN (SET BIT #5 IN RHCS2) 

ig is RHCSe ul? CHE CKE TO HAVE "IR" (BIT #6) HIGH, TOGETHER 
4804 :# EIGHT WORDS, A COUNT PATTERN O THRU 7 IS WRITTEN 

4BDE ‘+ “OR” (BIT #7 IN BHCS2) 1 WAITED FOR BY A TRAP 

4897 :# INSTRUCTION CALLED * 

4898 i N RHCS2 IS CHECKE HAT HAVE “IR LOW AND 

4899 :% “Hen HIGH TOGETHER er THE UNIT NUMBER 

#810 ia THEN RH RHBIS READ AND COMPARED TO HAVE THE RIGHT VALLE 
4812. i THEN RH HCS2, RHCS1, RHCS3, RHBA, RHBOE, RHWC ARE 

4813 # CHECKED TO’HAVE THE APPROPIATE’ VALUE 

4Sis s SFLSERAASRLEEAESSAAERALESALSRELAATTSSRESRAAAARARRSTRALSAELAAEL ESTEE 
¥815 O15102 900004 t4T14: SCOPE 

WBiE C1EIO4 912706 o01u00 MOV eSTACK, SP :RESET STACK 

4617 015110 012737 OOCOl4Y oo4ese MOY #14, 8fSTNM :SAVE TEST NUMBER 

4819 O15116 004737 o40312 JSR PC, J#CLDISK :GIVE RH INITIALIZE 

4820 :SETUP UNIT NUBER 

4821 CLEAR RHWC AND. FUNCTION BITS IN RHCS! 







4823 -CHECK THAT RHCS2 HAS IR 
4624 015122 012727 o00100 001124 MOV #IR, SGDDAT :GET GOOD = 100 

Hees 015130 063737 005019 001124 BIS uNTT. $GDDAT : INCLUDE UNIT NUMBER 
4827 15136 017737 166726 001126 MOV PRACSe. , SBDDAT ;READ RHCS2_ FO FOR _ SOMPARISON 
wBs9 O15154 023737 001124 OOllee CMP GDDAT; $BDDAT MPAR 





4829 . - iets WITH BATA READ FROM 
4831 015152 001401 BES 6S$ BRANCH IF GOOD 
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re 015154 194006 


Qo00o 
=o 
furor 


015240 


015240 012737 000001 OO4664 


T14 


SoS 001 


194411 
004070 


012737 
053737 


017737 
023737 


001401 
104023 
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E08 





ERROR 6 


iy Rac$s 10 Tor Toe a 


ng ba 6 Rte eT ROTHING ELSE 


TOGETHER Patten UN UNIT 1 HUNGER 
sen IN BAD RCSD 


;WRITE EIGHT WORDS INTO rk. saat ptt IT 
:THIS IS @ COUNT PATTERN O T 


ye ey To Be HAITTEN = 0 
;GET NEX 


Raut an RHDS - A COUNT 


DEC Re ; COUNT 10 7 
BNE 1$ BRANCH IF 8 NOT DONE 
;WAIT FOR OR BIT IN RHCSe ISTER T 

T TREE i “halt F SUBROUTINE 


~ pe yey GISTE 
LIF sei iste, HERE 
:IT MEANS “OR” DID NOT 


(Ba G6 FE Catt, Petteourme 


:THIS TIME IS APPROXIMATE’ 
;LARGER THAN SOO MILLISECONDS 


:CHECK THAT RCE HAS OR 
Mov #0OR, SGODAT ;GET GOOD = 200 
BIS ont $GDDAT INCLUDE UNIT NUMBER 
MOV DRHCS2,$8DDAT  ;READ RHCS2 FOR COMPARISON 
CMP SGDDAT,$BDDAT  :COMPARE EXPECT 

sDRTR, WITH DATA READ FROM 
67S :BRANCH IF GOOD 


BEO 
ERROR 23 
sAFTER a5 TTING Ge ee BIT #5 


;IN 
aRHC HCS2 SHOULD HAVE OR 
GETHER WITH UNIT NUMBER 


10 
BUT CONTAINED WHAT IS 
;GIVEN IN BAD RHCS2 


MOV #1,STLONM ;FIRST WORD TO BE READ 









uso? 015274 
4903 015274 
4811 015302 
#913 015310 
4914 O1S316 


4917 015324 
4918 015326 
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012737 
017737 
023737 


001401 
104024 


012737 
012737 


017737 
023737 


001401 
104024 


012737 
012737 
017737 
023737 


001401 
1o4de4 
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000000 001124 


1$S62ee 001126 
001124 001126 


oo0002 OO4ES4 
00000: 001124 


166586 901126 
001124 001126 


090003 OO4664 
oo000e 001124 


166532 001126 
001124 o0lle6 
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69S: 


3v 


MO 


CMP 


BEQ 
ERROR 4 


MOV 


HECK TAR separ HAS QO 


V JRHOB, SBODAT 
SGDODAT, $BDDAT 


69S 


MOV #2, SILONM 
: CHECK THAT RHO HAS 1 


MOV 


,» SGDDAT 


MOV anes $BODAT 
CMP $GDDAT, $BODAT 


BEQ 
ERROR 24 


BEQ ss 718 
ERROR 24 


MOV #3, SILONM 
:CHECK THAT RHOB | "HAS 2 
MOV #2, SGDDAT 


MOV RHDB, SBDDAT 
CMP 


$GDDAT, SBDDAT 


73$ 


FOS 


; THIRD WORD TO BE READ 
;GET GOOD = 0 


:RHDB 
;BRANCH IF GOOD 






;GET GOOD = 0 

D RHDB FOR COMPARISON 
‘ain RTA. READ FROM 
BRANCH IF GOOD 


;QFTER SETTING “CLR” BIT aS 
IN RHCS2 TO INIT THE RH 
SAND WRITING A 

5 COUNT parr ° Ne, ? 
;INTO RHOS TO FILL I 

; THEN ON READING RHDS THE 


SEIRST T 
SHOULD HAVE 0 

:BUT CONTAINED WHAT IS 

:GIVEN IN BAD RHOB 











;SECOND WORD TO BE READ 
;GET GOOD = 0 


;READ RHDB FOR —e 
COMPARE EXPECT 
;DATA WITH BAYA READ FROM 


BRANCH IF GOOD 


;AFTER SETTING “CLR” BIT #5 
iIN atm TQ a NIT THE RH 


: COUNT PRITERN. 0 es 
NTO RHDB TO FILL IT 
t THEN ON_READING RHDB THE 
i ECOND T 
HDB SHOULD HAVE 1 
:BUT CONTAINED iat IS 
:GIVEN IN BAD RHDB 




















;READ RHDB peer COMPARISON 
COMPARE EXP 
;DATA WITH BATA READ FROM 










yy SETTING “CLR” BIT #5 
N RHCSe TO ial THE RH 
* AND WRITING A 
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yeas ‘ONTO RHOB TO FIL THA 7 
4 ‘T ADING Ube T THE 
daa3 THR OF RE 

4aug ; coreg a 
4950 aire RHDB 

4351 015364 733: 

uge3 015364 912737 00004 oD46S4 #4, SILONM sFOURTH WORD TO BE READ 
4954 MOHECK THat RHDB HAS 3 

i355 018372 212737 000003 001124 MOV #3, SGDDAT :GET GOOD = 0 

957 O1S400 017737 166476 001126 MOV JRHDB, SBDDAT READ RHDS FOR EQttPARISON 
4958 015408 923737 O01124 001126 CMP - $GDDAT, SBDDAT : COMPARE 

4959 :DATA WITH DASA READ FROM 
4960 RHDB 

4961 015414 90140! BEQ 758 :BRANCH IF GOOD 

4962 O15416 104024 ERROR 24 ¢ 

4963 AFTER SETTING “cLR" BIT #5 
4964 IN RHC HcSe T 0 INIT THE RH 
4965 | WRIT ING A 

4QEé 






count J QO THRU 7 







4967 SINTO RHOB TO FILL I 
4968 : i THEN ON READING RHOB THE 
4965 ;FOURTH TIME 

4970 RHDB SHOULD HAVE 3 
4971 im be :BUT CONTAINED WHAT IS 
4972 :GIVEN IN BAD RHOB 
4873 015420 75S: 






4974 
4975 015420 012737 oO000S CO4EE4 MOV #5, SILONM ;FIFTH WORD TO BE READ 
4976 : CHECK THAT RHOB As 4 

pee C1S426 0912737 O00004 001124 MOV 4, SGDDAT :GET GOOD = 0 









4979 015434 017737 166442 O01le6 MOV @RHOB SBODAT ;READ RHDB FOR COMPARISON 
4980 OiS4#4e 023737 O011e4% COlleb CMP $cDDAT, ) SEDOAT ;COMPARE EXPECTED 

net sare WITH DATA READ FROM 
4983 915450 001401 BEQ 77$ BRANCH IF GOOD 

4984 C1545e 104024 3 ERROR 24 

4985 ;AFTER SETTING “CLR” BIT #5 
4986 fe. IN at TO INIT THE 8H 
4987 ;AND WRITING A 








4988 3s COUNT PATTERN O THRU 7 

4985 ;INTC RHDB TO FILL IT 

4990 ; THEN oy READING RHDB THE 

4991 FIFTH TIME 

4992 ;RHDB SHOULD HAVE 4 

4993 ;BUT CONTAINED WHAT IS - 
4994 GIVEN IN BAD RHDB 

4995 015454 77$: 







4996 
4997 QISYS4 012737 OO0D0 oO4S64 MOV #6, SILO ;SIXTH WORD TO BE READ 
4999 - CHECK THat PHOS. HAs 5 





4999 015462 012737 O0000S 001124 Mov 5, SGDDAT ;GET GOOD = 0 













ngs & 60 (736 douhe | Be ereeny eo :11 PAGE 100 


5000 
5091 O1S470 O17737 166406 001126 MOV JRHDB, SBODAT READ RHOB FOR OMPARISON 
015476 023737 001124 001126 CMP $GDDAT, SBDDAT OHEARE xPECT De 
ss TH DATA READ FROM 


015504 001401 BEG 798 1 IF GOOD 


coy 015506 104024 ERROR 24 TES cua BIT as 
eat 7 


ae aTTERN. O THRU 7 





















£011 TO RHOB TO FILL IT 
1g THEN ON READING RHO THE 
1 ;SIXTH TIME 
14 SHOULD HAVE 5 
5015 ‘BUT CONTAINED WHAT IS 
5016 GIVEN IN BAD RHOB 
201 015510 798: 
ent 015510 012737 oD0007 jcO4eE4 MOV ILONM ;SEVENTH WORD TO BE READ 
5020 ; CHECK That RHDB HAS 6 : 
cise O1SS1&6 012737 ocO0006 001124 MOV , SGDDAT :GE) GOOD = 0 
015524 017727 166352 001126 MOV ines $BDDAT § ;READ RHDS FOR COMPARISON 
5004 15532 023737 O01124 OO1126 CMP $GDDAT,SBDDAT  :COMPARE EXPECTED 
5025 *DATA WITH DATA READ FROM 
5026 RHDB 
§027 o1ss4o 001401 BEQ 915 :BRANCH IF GOOD 
So2s 015542 104024 ERROR 24 : 
5029 ice TTING "CLR BIT 8S 
6030 ; : IN INIT THE 
5032 COUNT bat TERN O THRU 7 
3 ie TO FILL IT 
034 ?THEN ON READING RHOB THE 
: SEVENTH TINE 








5038 sBuT IN RHDB 
ay O1ss44 81$: 

SO41 O1S5S44 012737 GOO0010 O04664 MOV ° _#8.,SILONM sEIGHTH WORD TO BE READ 
5042 -CHECK THAT’ RHOG HAS 7 

apis O1sSS2 012737 oO90007 001124 MOV #7, SGDDAT ;GET GOOD = 0 









Sous O1SS60 017737 166316 001126 MOV JRHDB, SBDDAT ;READ RHOB F FOR COMPARISON 
S046 015566 023737 001124 OOiles CMP $GDDAT, SBDDAT NPARE, EXP 

e047 ‘Bara TH DATA READ FROM 
5049 15574 001401 BEQ 83$ BRANCH IF GOOD 

b0s0 O15576 104024 ERROR 24 

£051 sAFTER SETTING “CLR” BIT #5 
05 IN RHCES TO IN NIT THE RH 
50 NG 

E054 COUNT BAT TERN 0 THRU 7 
enss :INTO RHOB TO FILL IT 
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S056 es THEN ON FER READING RHDB THE 


50538 5 HAVE 7 
de Slt D WHAT IS 
ebeg : GIVEN IN RHDB 
e0b1 015600 83S: 
5063 
2064 :CHECK THAT RHCS2 HAS IR 
OSS O1S60C 012737 000100 001124 hov #IR, SGDDAT ;GET GOOD = 100 
BObE 015606 053737 O0SO10 001124 BIS UNIT, $GDDAT ‘INCLUDE UNIT NUMBER 
508 015814 017737 001126 MOV DRHCS2,$BDDAT  ;READ RHCS2 FOR COMPARISON 
Ois622 023737 O01124 OO1126 CMP $GDDAT,$8DDAT  ;COMPARE EXPECTED 
2070 ;DATA WITH DATA READ FROM 
015630 001401 BEQ BSS t BRANCH IF GOOD 
015632 104025 ERROR 25 
74 sAFTER SETTING “CLR” BIT Ps 
5075 IN RHCS2 TO INIT THE RH 
AND WRITI 
5 COUNT PATTERN O THRU 7 
5078 ite To RHOB TO FILL 
5079 it ON READING RHOB THE 
2080 ;T TIMES 
1 : Races HAVE IR 
cose : 3=100 
5083 TOGETHER WITH UNIT NUMBER 
epee BUT CONTAINED WHAT IS 
08s GIVEN IN BAD RHCS2 
015634 gss: 
5087 :CHECK THAT RHCS1 HAS DVA!RDY 
S088 Oi5634 012737 oO4200 001124 hov #DVAIRDY,SGDDAT ;GET GOOD = 4200 
5090 O1S&é4¥2 017737 1b6212 O01126 MOV JRHCS1,SBDDAT  ;READ RHCS1 FOR COMPARISON 
03 015650 023737 GO1124 O01i26 CMP $GDDAT;$BDDAT COMPA E 
Bpas ;DATA WITH DATA READ FROM 
5094 O1S6S& 001401 . BEQ 87S BRANCH IF GOOD 
509s O15660 04026 ERROR 26 
5096 AFTER SETTING "LR" BIT #S 
5097 IN RHCS2 TO INIT THE RH 
5098. . AND WRITING A 
033 i¢ NT PATTERN 0. THRU 7 
100 . : INTO OF 
101 : THEN Bh BEADING RHDB 
. $102 ;TOTAL 8 TIMES 
5103 sRHUST SHOULD HAVE DVA!RDY 
5104 249) 
5105 ‘BUT CONTAINED WHAT IS 
5106 GIVEN IN RHCS1 
5107 o1seee rae 87S: 
5108 “CHECK THAT RHCS3 HAS 0 
109 o1st62 012737 oO00000 001124 HOV #0, SGDDAT ;GET GOOD = 0 
Elll O15670 017737 166236 O01126 _ MOV @RHCS3,SBDDAT  ;READ RHCS3 FOR COMPARISON 
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01567 023737 001124 001126 CMP SGDDAT,SBDDAT COMPARE EXPECTED 
;DATA WITH DATA READ FROM . 


;RHCS3 
Bigsoe To4d ERROR 57° poten! same: 
rahe SETTING “CLR” BIT #& 


+— & -b-=b--p~— bp - pe 
— & +b -~b--b — ob - 
OnNWU£ itu 


sf ON READING RHOB THE 
TO TR A TI ae 
RHCS3 


89s: 
:CHECK THAT RHBA HAS O 
012737 900000 001124 Mov #0, SGDDAT ;GET GOOD = 0 


77 142 001126 © MOV RHBA,$ par AD RHBA FOR ARISON 
ober 3s 1124 pot tse CMP GoDat, RE NPARE EXP RrED 
sbATA aiTiD DATA READ FROM 
001401 BEG 915 :BRANCH IF GOOD 


104030 RROR 30 
, ;AFTER SETTING “CLR” BIT aS 
IN at ha; TO INIT THE RH - 


FH EOUV—SLGBVRAL OVS Be Voor Lowe 


<= 
ono 


BUT CON Cort 
2G VEN I 


918: 
;CHECK THAT aa HAS 0 
01e737 000000 001124 MoV #0, SGDDAT ;GET GOOD = 0 


017737 166160 001126 MOV ORHBAE,SSDDAT  ;READ RHBAE ma... COMPARISON 
023737 OOlle4% OOlleb CMP $GDDAT,SBDDAT  ;COMPARE EXPECTE 

spare METH DATA READ FROM 
001401 BEQ 938 sBRANCH IF GOOD 


104031 31 
;AFTER SETTING rf ne BIT #5 
:IN nr TQ INIT THE RH 
WRITING A 


; AND 

sGOUNT grip TF 0 pit ? 
iy ON RE THE 
TOTAL 8 T 

;RHBAE SHOULD HAVE 0 

;BUT CONTAINED WHAT IS 
GIVEN IN BAD RHBAE 


5 
| 
S 
: 
: 
5 
5 
: 
5 
S 
: 
5 
e 
S 
5 
: 
5 
5 
5 
5 
S 
5 
S 
5 
5 
S 
5 
S$ 
5 
5 
E 
5 
S 
S 
S 
s 


b— 0 6 = 6 b= = 0 = = 0 0 = 0 = Os 0 2 8 bb 0 + bb be be bb 0 be be ho ph 


COSCO MO MWUUMUIUIUIUIUIUIUIU © 


015764 
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wal ~DERHAS-A 


012737 000000 001124 


GASPS? ARTES. BBILSE 


ee 


“J 


o—- b= & - 9b b= 9 + 
w 


BB SB URAL O Owe ou 


wo 
Ww 


Saati tal talaga) 


b+ b= b= 6 0 6 b= b= -+ 8 8 8 + 0 bh 8 -  e 


EHH SSO VEAL 


=o Me oR OC OR ie Oe ic BKC ic DB ic DC Oke De ee 


Se 
Se 
es 
Se 
06 





CHECK THAT RHWC HAS 0 
hov #0, SGDDAT GET GOOD = 0 


oe ARNE, cane em pee 
DATA WITH DATA READ FROM 

BEQ 95$ 1 ae IF GOOD 

ERROR 32 

ES Wath ks © 

eee RAD 


(C SHOULD HAVE 0 
BUT CONTAINED WHAT IS 
GIVEN IN BAD RHWC 


a a Geek ot 7 7 eee 


T 15 SILO TEST S (FLOATING ONES) 


AFTER om CLEAR I eae (SET BIT #5 IN RHCS2) 
RHCSe I g tery 0 HAVE “IR” (BIT #6) HIGH, 
TOGETHER WIT 


EIGH 

1S urITY RHDB 

“OR” (BIT #7 IN RHCS2) IS WAITED FOR BY A TRAP 

ferme ron CALLED “WAT” 

THEN RHCSe IS CHECKED TO HAVE "IR" LOW AND 
HIGH TOGETHER =! THE UNIT NUMBER 

THEN RP Partch Cea” MPARED TO HAVE THE 

RIGHT VALUE AFTER EACH OF THE EIGHT READS. 

THEN Rese IS CHECKED TO HAVE “IR” 

AND UNIT NUMBER 


THEN RHCSI., uflcs3 RHBA, RHBAE, RHWC ARE 
CHECKED TO’HAVE THE APPROPIATE VALUE 


eapeenyeaeanenceaneantaaeensenneansenteaseaneaaeaseestenseatey 


SCOPE 
MOV #STACK, SP ;RESET STACK 
MOV #15, aaTSTNM *SAVE TEST NUMBER 


JSR PC, d#CLDISK ;GIVE RH INI TTRS 1ZE 
iS Tue UNIT N 





HORDS ne PATTERN OF FLOATING ONES (1,2,4,10,20,40, 100,200) 


UBER 
EAR RHWC AND FUNCTION BITS IN RHCSi 


:CHECK THAT RHCS2 HAS IR 
MOY #IR, SGDDAT GET GO 0D = 00 
BIS UNIT, $GDDAT ‘INCLUDE UNIT NUMBER 


MOV MRHCS2,SBDDAT  ;READ RHCS2 FOR COMPARISON 
CMP $GDDAT,$BDDAT  ;COMPARE EXPECTED 








LO8 
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5224 ;DATA WITH DATA READ FROM 
eee 14 9g S$ BRANCH IF GOOD 
pier ERROR 


;AFTER SETTING “CLR” BIT #5 
;IN mo TO INIT THE RH 
; HAVING DONE NOTHING 


i SHOULD HAVE IR 


THER WITH UNIT NUMBER 
sat CONTAINED WHAT IS 
;GIVEN IN BAD RHCS2 


jot Me EIGHT WORDS INTO RHDB TO FILL IT 


S i, eye 4,10,20,40, 1, 200 ¥ 10 FLOAT ONES 
ier “8 BATA WORDS 
WRITE INT 
3H IFT t ONE RBOSITION LEFT 
be ets 08 


1s HIE 8. NQT DONE 
:WAIT FOR OR’BIT IN mest REGISTER 

104411 HAT TO lary. 7 SUBROUTINE 
0040970 RHCS2 : 

oo0200 OR 


Peron 


Vo 


; THE WAIT.T SUB 
;THIS TIME IS APPROXIMATELY 
;LARGER THAN SOO MILLISECONDS 


;CHECK THAT RHCS2 HAS OR 
012737 000200 CO11e4 HOV #OR, SGDDAT ;SET GOOD = 200 
053737 005010 001124 BIS UNIT, $GDDAT ; INCLUDE UNIT NUMBER 


017737 165732 001126 MOV @RHCS2,$80DAT ;READ RHCS2 FOR COMPARISON 
023737 O0112e4% O011e6 CMP SGDDAT,;SBDDAT  ;COMPARE EXPECTED 

Wat WITH DATA READ FROM 
001401 BEQ 67$ ;BRANCH IF GOOD 


104023 e3 
sat SETTING “CLR” BIT #5 


§ oovao 100 20 
ATO o8 To FD aT 


15200" 
TOGETHER WITH tl NUMBER 
‘BUT CONTAINED WHAT IS 
GIVEN IN BAD RHCSE 





0161Se 


016152 
016160 
16166 
16174 


016292 
016204 


016242 


Ol624e 
016250 





ce aaa 


012737 
012737 
0177 

923737 


091401 
104024 


012737 
012737 
017737 
023737 


001401 
104024 


012737 000003 oo4EE4 
012737 oco004 o01124 


15:11 PAGE 105 


iSHECK = sft HAS 1 


HATO Ait ba 7) Ft tt 


:CHECK THAT RhDB. HAS 2 
OV #2, SGDDAT 


i CHECK THAT sec HAS 4 








;FIRST WORD TO BE READ 
;GET GOOD = 0 


;READ RHDB FOR tlie ae 
;COMPARE EXPECT 
sDAT A WITH DATA READ FROM 
‘BRANCH IF GOOD 
sAFTER SETTING ae #5 

WRITING A 

iFLORTING i ae IS 
C,200) 
N RE ADING RHOB THE 
ONE 
 RHOB SHOULD _HA 


VE 1 
;BUT CONTAINED WHAT IS 
GIVEN IN BAD RHDB 


;SECOND WORD TO BE READ 
;GET GOOD = 0 


;READ RHDB por A tear 
COMPARE EXP 
DATA WITH BATA READ FROM 


;RHDB 
;BRANCH IF GOOD 
jAFTER SETTING “CLR” a #5 


2.4.1 § optap Non 20a} 
TAT ) Ai 58 TO FILL {tT 
; TH HEN ON READING RHDB THE 


RHOB SHOULD HAVE 2 
; BUT CONTAINED WHAT IS 
GIVEN IN BAD RHDS 


; THIRD WORD TO BE READ 
;GET GOOD = 0 


















cs aaa 
ae tite 


016272 


0162” 


016276 
036304 


916312 
0163e0 


oo 


= 
ow 
GJ) 


326 
30 


016332 


016332 
016340 
16346 
16354 


016362 
016384 





T1S 


012737 
012737 
017737 
023737 


001401 
104024 


012737 
012737 


023737 


001401 
104024 





900004 
000010 


165564 
001124 


000005 
000020 


65530 
01124 


MACY11 27(732) 
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Be678> ABITSY O1i8E 


001401 
104024 
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;READ RHODE FOR COMPARISON 
-}DATA WITH "DATA READ FROM 


; RHO 
BRANCH IF GOOD 


;AFTER SETTING “CLR” BIT #5 
; IN athe TO INIT T 

AND WRITING A PATTERN OF 
gFLOATING ON Sie a ee IS 
:TTD RHO TO FILL tT 

i THEN . R ADING RHOB THE 

; THIRD TIM 

;RHDB SHOULD HAVE 4 
:BUT CONTAINED WHAT IS 
;GIVEN IN BAD RHDB 


MOV GRHOB SBDDAT 
CMP Gopat, SBO0AT 


BEQ 73$ 
ERROR 24 











OO4E64. MOV #4, SILONM ;FOURTH WORD TO BE READ 
‘ss CHECK THAT RHDB HAS 10 

001124 MoV #10, SGDDAT ;GET GOOD = 0 

001126 MOV JRHDB,SBDDAT.  ;READ RHDB FOR EOMPARISON 

001126 CMP SGDDAT,$BDDAT  ;COMPARE EXP 


:DATA WITH BATA READ FROM 
: BRANCH IF GOOD 


SAFTER SETTING "CLR" BIT #S 
?IN RHCS2 TO INIT THE R 

*AND WRITING A PATTERN OF 
sELOATING ON ONES S$, CHHICH TS 
iTATO RH pe fa Pte {tT 

: THEN ON READING RHOB THE 
‘FOURTH TIME 

*RHDB SHOULD HAVE 10 

: BUT CONTAINED WHAT IS 
GIVEN IN BAD RHDB 


BEQ 75$ 
ERROR 24 











758: 


OO4664 MOV #5, SIL ;FIFTH WORD TO BE READ 
-CHECK THAT Se HAS 20 

001124 MOV #20, SGDDAT ;GET GOOD = 0 

001126 MOV JRHDB,SBODAT. §;READ RHDB FOR COMPARISON 

001126 CMP $GDDAT,SBDDAT  ;COMPARE EXPECTED 


sDATR WITH DATA READ FROM 
BRANCH IF GOOD 


;AFTER SETTING “CLR” BIT #5 
IN RHCS2 70 INIT THE RH 


BEQ 77$ 
ERROR 24 





fae ee ee 


5447 ;BUT CONTAINED WHAT IS 


“iS INDE“- 15-08 Seag-2 “a ST. 732) S2-SES-"E 15:11 PAGE IC 
DEss2. 38: ‘is Sic tas? § (FLORTING ONES 
| $332 -OAS GMITING & PATTERN OF 
| e333 "ELBaTING ONES (WHITH IS 
233< 51,2,4, 30,20, 40, 100.200) 
5395 72478 pe To iu iT 
ss ; MEN ON PERDING RHDS T 
=33° :EIFTH TIME 
| $388 :RHOB SHOULD HAVE 29 
; 333 :BUT CONTAINED WHA” 2 
| Pe ng :SIVEN IN BAD RHO 
| $82, 22838 : ee 
£453 
Seis Cls2s Liz7S7 OCOODE DoMeEs v ;SIXTH WORD TO BE READ 
5-25 ex rest? ied He 40 
S928 21837 1E737 O0DOsD «O011es #40, $GDDAT :GET GOOD = 0 
S4OS Dg402 O:773T 1eS474 01128 MOV aRH08 SEDDAT READ RHDS FOR COMPARISON 
S49 16415 523757 Sol124 oOllis 2ME GOBAT $B5DAT  sCOMPARE EXPECTE 
eit “ SDATA WITH DATA READ FROM 
S418 016416 001401 REQ Poe BRANCH IF GOOD . 
S4is S1ss2o [54054 ERROR 24 
5415 : AFTER SETTING “cLR" BIT 8S 
S45 N.RHCS2 TO INIT THE RH 
S476 :AND WRITING A PATTERN OF 
sie Pati ONES a Has 
Eats HA moe Fy etre ote 
5459 T READING ROS THE 
543] SETH Tine 
Suse RHDB SHOULD HAVE 40 
5453 :BUT CONTAINED WHAT IS 
5424 :GIVEN IN BAD RHDB 
S425 o1g422 755: 
Suse 
S457 
5455 O16422 012737 O00007 co¥EEY MOV ;SEVENTH WORD TO BE READ 
£459 ; CHECK That “rie. HAS 100 
3420 018430 012737 000100 o01124 MOV 0, SGODAT ;GET GOOD = 0 
S432 O1S42E 917737 185440 001126 MOY rapes :READ RHDS FOR COMPARISON 
S433 616454 623727 O01124 O0lle6 CMP $GDDAt,SBDDAT :COMPARE EXPECTED 
| 534 :DATA WITH DATA READ FROM 
a ~ : 
| §436 O164S52 001401 REQ 21g :BRANCH IF GOOD 
5437 O16454 id4o2 ERROR 24 
543¢ SAFTER SETTING “CLR” BIT aS 
£439 :IN RHCEe 70 INIT THE RH 
5450 . : ITING A PATTERN 0 
| Spat SPLAT ING ONES (WHICH 
| ayy 0,20, 40, 100, 200) 
| S443 STATS ARDO Te PUL tt 
| Bg TEN oN READING RHDB THE 
| Equs :SEVENTH TIME 
E44e a :RHOS SHOULD HAVE 100 
! 

























S484 O16S4e 
S485 UlSS44 
5486 


S499 CleS46. 


5501 Ol6S46 


.. $592 16554 
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8 
pee OL1E4SE 


235 016456 
4 
S454 Olé464 


165336 
023737 ‘Brie 00 


fis Sica test. 


Ole737? 0000:9 004664 
Ole7s? 000200 001124 


O177s? 165404 001126 
U2373° O0lle4 OO011e6 


091401 
id4024 


912737 000109 90 
0S3737 O0S010 00 
00 


017737 


001401 


104C2S 


012737 cO4200 001124 
017737 165300 O0il26 


€3$: 


ess: 


MoV 
peat 


MOV 
CMP 


SEQ 
ERROR 


Oy 


BIS 
MOV 
CMP 


© 


BEQ 
ERROR 


HOV 
MOV 





rise “Rid8 Ves 


“SGDDAT 
JRHOB , SSODAT 


$GDDR*, SBDDAT 


83$ 
24 


; CHECK ee RHCS2 HAS IR 


UNTT. $GDDAT 


aRHCS2, SBDDAT 
$GDDAT, SBDDAT 


ess 
es 


iFLdatiN ee 


;GIVEN IN BAD RHDB 


» aaitit WORD TO BE READ 

O cet G00D = 0 

;READ RHDB FOR COMPARISON 
:COMPARE EXPECTED 

:DATA WITH DATA READ FROM 


;RHDB 
BRANCH IF GOOD 


Hin Recee 10 INIY °F te ma #5 


7 T 
ITING A PATTER OF 


H IS 
40 too “BOoS 
HARD bs alipa® 8 FILL tT 

BEADING Rude THE 
EIGHTH HORE 
:RHOB SHOULD HAVE 200 
“BUT CONTAINED WHAT IS 
:GIVEN IN BAD RHOB 


;GET GOOD = 100 
; INCLUDE UNI? NUMBER 


;READ RHCS2 FOR COMPARISON 


COMPARE EXPECTED 
;DATA WITH DATA READ FROM 


:RHC 
BRANCH IF GOOD 


sAFTER SETTING runt BIT ss 


v 
; 40,10 
TAO AHO’ 18 FLL fT 
HEN ON READING HOS THE 
sTOTAL § TIMES 
ti SHOULD HAVE IR 
TOGETHER WITH UNIT NUMBER 
SBUT CONTAINED WHAT IS 
SEVEN IN BAD AHCS2 


;CHECK THAT RHCS1_HAS DVA!IRDY 


SOVAIRDY,SGDDAT ;GET GOOD = 4200 


SRHCS1, SBODAT 





;READ RHCS1 FOR COMPARISON 


the 






























MAINOEC-11-DERHAS-A 
DERHAB . SRC T15 





= 018Sée2 


016574 
016574 





023737 


001491 
104026 


012737 


017737 
023737 


012737 


017737 
023737 


001401 
194030 
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SILO TEST 5 (FLOATING ONES) 


01124 901126 CMP —- SGDDAT, SBDDAT 
BEQ 875 
ERROR 26 
97s: 
sCHECK THAT RHCS3 HAS 0 
peoo0o oo11e4 Mov #0, $GDDAT 
165324 001126 MOV JRHCS3, SBDDAT 
001124 OO1126 CMP $GDDAT. $8DDAT 
BEQ 895 
ERROR 27 
3S: 
-CHECK THAT RHA | HAS 0 
o00090 901124 Mov #0, SGDDAT 
165230 001126 MOV JRHBA, SBDDAT 
Oolfe4 O0ll26 CMP SGDDAT, SBDDAT 
BEG q1$ 
ERROR 30 


as ANDA TO FTE tT 





; COMPARE EXPECTED 
;DATA WITH DATA READ FROM 


ieee, IF GOOD 
HIN aces 10 INzt “CLR” SIT ss 


THE RH 
WRITING A PATTERN OF 


FLD ATI So ( 3 
Hes" igs oe PtiL 160, eo 
Than Oh 8 ON READING La THE 


8T 
" SHOULD HAVE DVA!RDY 
-JT CONTAINED WHAT IS 


;GIVEN IN BAD RHCS1 


;GET GOOD = 0 


;READ RHCS3 FOR COMPARISON 
;COMPARE_EXPECTE 
:DATA WITH DATA READ FROM 


HCS3 
‘BRANCH IF GOOD 


;AFTER SETTING ae a a5 
3 . CS2_ TQ INIT THE RH 

AND WRITING A ci OF 
:FLOATING i (WHICH IS 
40,100,200) 


Tate RHOb 70 FILL tT 
: THEN ON READING RHOB THE 


TOTAL 


;RHCS3 SHOU 5 HAVE 0 
BUT CONTAINED WHAT IS 
GIVEN IN BAD RHCS3 


;GET GOOD = 0° 
;READ RH5A FOR COMPARISON 


:COMPARE EXP 


spATR WITH DATA READ FROM 
;BRANCH IF GOOD 
Oy BR SETTING “CLR” BIT aS 


Noe TO ANY, THE RH 
WRITING A PATTERN OF 


;FLORTING ONES (WHICH IS 


0,200) 


ON READING RCS THE 
TOTAL 8 TIMES 





016859 
016650 
O16ES6 
016564 


16672 
18874 


O1sé7é 
016676 


018704 
01671e 


~) 


6720 
6722 


oo 


b-+ hs 


016724 


MAINDEC-11-DERHAS-A 
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012737 


012737 
017737 
023737 


002401 
104032 


MACYI1] 27(732) 
SILO TEST S (FLOATING ONES) 


000900 001124 


1126 
O0011e4% O011e6 


coocoo 9001124 


165152 001126 
O011e% OOileb 


RHCSe IS CH 
TOGETHER WITH UNIT _N 
EIGHT WORDS, A PATTERN OF FLOATING ONES IN UPPER BYTE 





22-SEP-76 15:11 PAGE 110 


ke THAT T SCbBAt HAS 7 


08 » S8DDAT 
$GDDAT | $BDDAT 
93$ 

31 


;CHECK THAT RHWC HAS 0 
OV #0,$ 


SDDAT 
JRHWC , SBDDAT 
$GDDAT, SBDDAT 


9S$ 
32 


Te aaa Ke gece eg 
SILO TEST & (FLOATING ONES IN UPPER B8YTE) 


AFTER A RH aoe TS GIVEN (SET BIT #5 IN RHCS2) 
CKED TO Ayo "IR" (BIT #6) HIGH, 


ies IN BAD RHBA 


630 RHERE ee COMPARISON 
:DATA ier BATA READ FROM 
mn 

;BRANCH IF GOOD 


‘ oe 
oF 


;RHBAE SHOULD HAVE 0 
;BUT CONTAINED WHAT IS 
;GIVEN IN BAD RHBAE 


READ RHWC FOR A aatatate 
ARE _EXP 

sere WITH DAFA READ FROM 

BRANCH IF GOOD 


tN 5 Seine Perit . 


N ON OREADING” he THE 
AL 8 Ue 


OULD HAVE 0 
‘BUT CONTAINED WHAT IS 
:GIVEN IN BAD RHWC 


FOS 
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DERHAB. SRC T16 SILO TEST & (FLOATING ONES IN UPPER BYTE) 


of AlN BHCS22 JS WAITED FOR BY A TRAP 
S CHECKED TO HAVE "IR" LOW. AND 
GETHER WITH THE UNI 5 
AND COMP 


téTig: SCOPE 
12708 001000 MOV #STACK, SP sRESET STACK 
BtSo3 OOO01E OO4éSE MOV 816, a8TSTNM :SAVE TEST NUMBER 


004737 O4931e JSR PC, daCLDISK iti 7" pee 
CLEAR RHWC AND FUNCTION BITS IN RHCS1 


sCHECK THAT RHCS2 HAS IR 
012727 o90100 901124 hov 8IR, SGDDAT :GET GOOD = 100 
053737 005019 O01124 BIS UNIT, $GDDAT : INCLUDE UNIT NUMBER 


017737 165104 001126 MOV @RHCS2,SBDDAT  ;READ wie Fe 4 COMPARISON 
023737 O011l2e% O01le6 CMP  SGDDAT,$BDDAT. ;COMPARE EXP 
:DATA WITH BATA READ FROM 


:RHCS 
001401 BEO 6S$ ;BRANCH IF GOOD 
104006 ERROR 6 
;AFTER SETTING "CLR" BIT 85 


IN gts TO_INIT THE RH 
;AND_HAVING DONE NOTHING 


sELSE 
st SHOULD HAVE IR 


; TOGETHER WITH UNIT NUMBER 
BUT CONTAINED WHAT IS 
;GIVEN IN BAD RHCS2 


sMRITE. EIGHT WORDS INTO RHDB TO FILL IT 
ibATA IS 400, 1000, 2000,4000, 10000, 20000, 40000 


012701 o00400 OV. #400,R1 — s GETTING REA READY TO FLOAT ONES 
012702 00010 #8. Re UNTER <8. 8 pata WORDS 
010177 165066 : R1, JRHDB WRITE INT 

006301 RI :§ cont 1 one RODS ITION LEFT 


53 Ro 
001373 BNE 1§ “BRANCH IF : NOT DONE 
“WAIT FOR OR BIT IN RHCSE REGISTER TO SET 
104411 WAT TO WAIT. T SUBROUTINE 
004070 RHCS2 AND PuaaT FOR OR BIT IN 





MAINDEC-11-DERHAB-A 
DERHAB. SRC 


S672 
73 


16 
017026 000200 


568737 
017737 
023737 


001401 
104023 


017064 


012737 
012737 


017737 
023737 


017064 
017972 


001401 
104024 


O011e4 001126 


BES teks 2 eel On nem 2 


OoS010 ObLis4 ate 
165020 001126 MOV 
CMP 


UNIT, SGDDAT 


@RHCS2, SBDDAT 
S$GDDAT; SBDDAT 


BEQ $75 
ERROR 23 


#1,SILONM 
MCHECK THAT RHDB HAS 4 
400, $GDDAT 


JRHDB, SBODAT 
ScDDAT, SBDDAT 


DO4SE4 
001124 Mov 


001126 MOV 
001126 CMP 


000001 
000400 
164776 
001124 


BEQ 69S 
ERROR 4 


GO9 
FU Gril 


;CHECK THAT RHCS2 HAS OR 
#OR, SGODAT 


sRHCSe REGISTER 


ERROR 
;1T_ MEANS “ 


Sola oF t ae a TINE 


: THIS Tine IS _APPROXIMATEL' 
LARGER THAN SOO MILLISECONDS 


:FRCLUDE- UNT? NUMBER 


;READ RHUS2 FOR COMPARISON 
;COMPARE EXPECTED 
;DATA WITH DATA READ FROM 


;RHCS2 

;BRANCH IF GOOD 

;AF TER a5 TiN Int THe aH BIT #S - 
IN RHCSe T 


AND HAV ving. watt TEN 
‘FLOATING ONES PAF TERN INTO UPPER BYTE 
400, 1000, 2000, 4000, 10000, 20005 
40000, 1 

PINTO RHDB 0 FILL I 

bs CS2 SHOULD HAVE 0 


TOGETHER WITH UNIT NUMBER 
BUT CONTAINED WHAT IS 
;GIVEN IN BAD RHCS2 


;FIRST WORD TO BE READ 
;GET GOOD = 0 


;READ RHDB FOR COMPARISON 
COMPARE EXPECTED 
:DATA WITH DATA READ FROM 


; RHDB 

BRANCH IF GOOD 

; AFTER SETTING “CLR BIT #5 
TQ INIT 


THE 
PATTERN OF FLOATING 
“ONES (WHICH IS 490, 1000,2000,4090, 
$1090 30000 40000. {o9008) 
NTO Roe TO FILL IT 
ane RHDB THE 


RHDB SHOULD HAVE 400 
ine CONTAINED WHAT IS 
;GIVEN IN BAD RHOB 





HO9 
DERNAB.SAG Tis = SILO fe8t‘G cFLORTiNG ONES IN UPPER BYTE) 
017120 69S: 


017120 Ole737 000002 O04664 TNE cK Tat hee anne WORD TO BE READ 
017126 012737 001000 001124 iy #1000, Seopa | ;GET GOOD = 0 


Bivite O58? bbiies BDILEE cre ScobatyS8B0nr Compare ExpeCTED 
DATA WITH DATA READ FROM 
tests 901401 BEQ 71$ ae IF GOOD 


104024 24 
;AFTER SETTING “oy BIT aS 
SIN RHCSe TO INIT THE RH 
AND WRITING A PATTERN OF FLOATING 
:0 1900 gOU0, SCOR 


;BUT 
017154 GIVEN IN BAD RHD 


017154 012737 o00003 oO4664 MOV #3, SILONM “THIRD WORD TO BE READ 
é -CHECK THAT RHDB HAS 2000 
012737 o02000 001124 OV #2000,$GDDAT  ;GET GOOD = 0 


017737 164706 001126 @RHDB, SBODAT ;READ RHDB FOR COMPARISON 


023737 O011e4% O01126 CMP $GDDAT, SBDDAT ; COMPARE EXPECTED 
;DATA WITH DATA READ FROM 


;RHDB 
hi BRANCH IF GOOD 
; AFTER ag TING “CLR” BIT #5 


: INIT THe Re 
:BND HR ING A ATTERN OF FLOATING 
WHICH IS 400, 1000,2000, 4000, 
; 10000 e000 4oo00, {goad} 
INTO RHOB TO FILL 
i 0 N N ‘READING one THE 


;RHOB SHOULD HAVE 2000 

;BUT CONTAINED WHAT IS 

GIVEN IN BAD RHOB 
017210 


017210 012737 OOD004 OO4eE4 MOV #4, SILONM “FOURTH WORD TO BE READ 
“CHECK THAT RHDB HAS 4O0) 
017216 012737 OO4000 001124 MOV -#4000,$GDDAT  ;GET GOOD = 0 


017224 017737 l646Se 001126 MOV RHDB , SBDDAT ;READ RHDB FOR COMPARISON 
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$784 017232 023737 O011e4 O011e6 CMP $GDDAT , SBDDAT ; COMPARE EXPECTED 
$785 + PHOE WITH DATA READ FROM 


B58? o1724 OD1401 | BeOS | H IF GOOD 
5788 Ol7242 104024 ERROR 24 : 
6? AFTER SETTING “CLR” BIT #5 
5790 , *IN RHCS2 TO INIT THE RH 
5731 : "AND WRITING A PATTERN OF FLOATING 
5792 ; ONES (WHICH IS 400, 1000, 2000, 4000, 

5753 $1000 20000, 40000, 1000 0b) 
5794 i INTO RHOB TO FILL 
5795 : ; THEN ON READING babe THE 
5795 , ; FOURTH T INE 
5797 *RHDB SHOULD HAVE 4000 
5798 :BUT CONTAINED WHAT IS 
5799 GIVEN IN BAD RHD8 
5800 017244 75S: 

Ce 

5803 017244 012737 occo00S oo4Es4 MOV #5, SILONM “FIFTH WORD TO BE READ 
5804 *CHECK THAT RHDB HAS 1 
S805 017252 012737 O10000 001124 MOV #10000, SCDDAT- ;GET GOOD = 0 
5807 017260 017727 164616 001126 MOV QRHDB,SBDDAT  ;READ RHDB FOR COMPARISON - . 
5808 917266 023737 001124 O0l1e6 CMP $GDDAT.SBDDAT COMPARE EXP 
5809 DATA WITH DASA READ FROM 
5810 : RHDB 
S811 017274 oO01401 BEG 775 :BRANCH IF GOOD 
S8i2 017276 104024 ERROR 24 

‘gis sAFTER SETTING “CLR” BIT #5: 
5814 : IN RHCEe TO IN qT THE RH 
581s - AND WRITING A PATTERN OF FLOATING 4 
5816 ONES (WHICH is yoo, 1000, 2000, 4000, h 
Sel? opel : 10000 e000, 4 oo00, {00008} eA 
5818 ; ; *INTO RHOB TO FILL’ 
5819 THEN ON READING RHOB THE 


5821 ;RHDB SHOULD HAVE 10000 
5822 BUT CONTAINED WHAT IS 
S823 GIVEN IN BAD RHDB 


5826 . 
5827 017300 012737 OO0006 OO4eE4 MOV ILONM “SIXTH WORD TO BE READ 
5828 - CHECK Tet? RHDB HAS 200h0 

8c 017306 012737 o20000 001124 HOV #20000,$GDDAT ;GET GOOD = 0 

5831 017314 017737 164562 OD1126 | MOV JRHDB,SBDDAT. = ;READ RHDB FOR PEgtPARISON 
5832 017322 023737 001124 001126 _ CMP $GDDAT,S$BDDAT  :COMPARE EXP 

Bess sae WITH BATA READ FROM 
5835 017330 O01401 BEQ 795 :BRANCH IF GOOD 

£836 017332 104024 ERROR 24 

5837 sAF TER SETTING “CLR” BIT #5 
£639 N RHCS2 T 


NIT THE RH 
AND WRITING 5 NPATTERN OF FLOATING 
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DERHAB . SRC T16 SILO TEST 6 (FLOATING ONES IN UPPER BYTE) 


5S GREE Af EEG" 


THEN -: NR uaa HOB THE 


SIXTH TIM 

sRHDB SHOULD HAVE 20000 

:BUT CONTAINED WHAT IS 

GIVEN IN BAD RHDB 
017334 


017334 912737 000007 OcD4Es4 MOV «SEVENTH WORD TO BE READ 
: CHECK Tat? Net "ups 4 b 
017342 012737 o4o000 001124 MOV #40000,$GDDAT  ;GET GOOD = 0 


017350 017737 164526 001126 MOV JRHOB, SSDDAT ;READ RHDB FOR COMPARISON 
017356 023737 OvlleY OOlle6 CMP SGDDAT,SBDDAT  ;COMPARE EXPECTED 
;DATA WITH DATA READ FROM 


'  $RHDB 
017364 001401 BEQ 81$ ;BRANCH IF GOOD 
017366 104024 ERROR 24 
j AFTER SETTING “CLR” BIT #5 
HCS2 TO INIT THE 


: IN RH 
"AND WRITING A PATTERN OF FLOATING 
ONES (WHICH IS 400, 1000, 2000, 4000, 
10000, 20000, 40000, 1go006) 

iNT NTO RHDB 78 FILL 

: THEN ON READING ae THE 
:SEVENTH TIME 


:RHDB SHOULD HAVE 40000 

:BUT CONTAINED WHAT IS 

;GIVEN IN BAD RHDB 
017370 


017370 012737 O00010 oOo4e64 MOV #8. , SILO “EIGHTH WORD TO BE READ 
-CHECK THAT’ RHO HAS 100800 
017376 012737 100000 001124 MOV #100000,$GDDAT ;GET GOOD = 0 


017404 017737 l6447e O01126 MOV ORHDB, SBDDAT ;READ RHDB pon  teaaet 
017412 023737 O0112e4% OOlleb CMP $GDDAT,SBDDAT  ;COMPARE EXP 
DAT A WITH BATA READ FROM 


;RHDB 
017420 001401 BEQ 83$ BRANCH IF GOOD 


017422 104024 24 7 
pOATER SETTING “CLR eI #5 
AND. URETING & A NOTTERN'S OF FLOATING 
WHICH IS 400.1 , 4000, 
1gp00 20000 yoood, 1ao000) 
0 RHDB TO FILL IT 
‘THEN ON READING RHOB THE 


H 
SHAD 90 
;GIVEN IN BAD RHDB 





DEAMAB.SAE Tig «SILO TEST 6 (FLOATING ONES IN UPPER BYTE). 


017424 83$: 


;CHECK THAT RHCS2 HAS IR 
017424 012737 000100 001124 HOV #IR, SGDDAT ;GET GOOD = 100 
017432 053737 005010 001124 BIS UNIT, $GDDAT ; INCLUDE UNIT NUMBER 


17440 017737 164424 001126 MOV MRHCS2,SBDDAT ;READ RHCS2 FOR COMPARISON 
17446 023737 OOlle4% OOlieb CMP $GDDAT,;$BDDAT  ;COMPARE EXPECTED 
sDATA WITH DATA READ FROM 


RHC 
017454 901401 BEQ 8S$ ? BRANCH IF GOOD 
017456 1040eS ERROR 25 
" ; ;AFTER SETTING fT oH BIT #5 


IN RHCS2 TO INIT 
‘AND WRITING A PATTERN OF FLOATING 
ONES (WHICH IS 400, 1000,2000,4000, 
0000,40000, 100008)”: 
TO FILL IT 
N READING RHOB. THE 


L 8 TIMES 
+ RHCS2 SHOULD HAVE IR 
GETHER WITH UNIT NUMBER 


T0 
;BUT CONTAINED WHAT IS | 
;GIVEN IN BAD RHCSe2 


017460 8S$: 
;CHECK THAT RHCS1 HAS DVA!RDY 
017460 012737 O04200 001124 MOV #DVA!IRDY,SGODAT ;GET GOOD = 4200 


O17466 017737 164366 001126 MOV @RHCS1,S$BDDAT ~ ;READ RHCS1 FOR COMPARISON 
017474 023737 O01le4% OO0llcb CMP $GDDAT;SBDDAT  ;COMPARE EXPECTED 
:DATA WITH DATA READ FROM 


: ; RHC 
017502 001401 BEQ 87$ ‘BRANCH IF GOOD 


017504 194026 ERROR 26 
sAFTER SETTING “CLR” BIT #5 
IN RHCSe TO INI T THE RH 
“AND WRITING A PATTERN OF FLOATING 
ONES (WHICH IS 400, 1000, 2000, 4000, 
; 10000 20000, 40000 100 00d) 
: INTO RH Hos TO FILL’ 
: THEN N READING b ADB THE 


: TOTAL % TIM 
;RHCS1 SHOULD HAVE DYAIRDY 


EBUT CONTAINED WHAT IS 
:GIVEN IN BAD RHCS1 


017506 87$: 
; CHECK oy py HAS 0 
017506 012737 o00000 001124 HOV 0, $GDDAT ;GET GOOD = 0 


017514 017737 164412 001126 MOV QRHCS3,SBDDAT  ;READ page <I re COMPARISON 
017522 023737 O011e4% 001126 CMP $GDDAT,$BDDAT  ;COMPARE EXP 
7 :DATR WITH BATA READ FROM 
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017530 
017832 


017534 
017534 
017542 
017550 


017556 
017560 


017610 


T16 


001401 
104027 


012737 
017737 
023737 


001401 
194030 


012737 
017737 
023737 


001401 
104031 


mere é7(732) 
SILO TE 


000000 901124 


164316 001126 
001124 001126 


000009 Cc011e4 


164334 001126 
001124 001126 


22-SEP- 
ST & (FLOATING 0 


89S: 


91S: 


938: 





S:11 


S IN UPPER” BYTE) 
o9$ 


BEQ 


ERROR 


Mov 


MOV 
CMP 


BEQ 
ERROR 


Mov 


MOV 
CMP 


BEQ 
ERROR 


27 


: CHECK THAT -RHBR HAS 0 
#0, SGDDAT 


JRHBA, SBDDAT 
$GDDAT , SBODAT 


91$ 
30 


;CHECK THAT RHBAE HAS 0 
#0, $GDDAT 


@RHBAE , SBDDAT 
S$GDDAT , $8DDAT 


93$ 
31 


: RHBAE 
;BRANCH IF GOOD 


sBRANCH IF GOOD . 
sAFTER SETTING “CLR” BIT #5 

: NIT THE RH 

PATTERN OF FLOATING 
: 6,200, 4000, 
fit 20000, 40000, 190000) 

N ON R DING RHDB THE 

AL M 

pals SHOULD HAVE 0 


;BUT CONTAINED WHAT IS 
;GIVEN IN BAD RHCS3 





















;GET GOOD = 0 


;READ RHBA om COMPARISON 
COMPARE EXP 
;DATA WITH DATA READ FROM 


: RHBA 
BRANCH IF GOOD 


sAFTER SETTING rola BIT #S 
IN RHCSe TO INIT RH 
A BATTERN OF FLOATING 

S 4yOO, 1000, 2000, 4000, 
{10000 20000, 40000, {oo0c0d) 
INTO HDB TO FILL IT 
: THEN ON READING RHOB THE 
: TOTAL ‘In NES 
RHBA SHOUL 
:BUT CONTAINED Nem IS 
‘GIVEN IN BAD RHBA 


;GET GOOD = 0 
;READ nt A 4 COMPARISON 


* COMPARE EXP 
ATA WITH BATA READ FROM 











SAFTER SETTING "CLR" BIT #5 

"IN RHCS2 TO INIT THE RH 

"AND WRITING A PATTERN OF FLOATING 
; ONES (WHICH IS 400, 1000, 2000, 4000, 
: 10000, 20009, 40000, foogod) 

it NTO RHDB TO FILL’ 

: THEN ON READING RHOB THE 

; TOTAL 8 TIM ES 

*RHBAE SHOULD HAVE O 

BUT CONTAINED WHAT IS 

GIVEN IN BAD RHBAE 
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017610 


B1718 
17E24 


017636 


017636 
017640 
017644 


017652 


017656 
017664 


~DERHAB-A 


T16 


012737 


023737 


001401 
104032 


000004 
012706 
912737 


004737 


012737 
053737 


orth gr (7ae) 
SILO TE 


ST 6 ¢ 


000000 001124 


64240 001126 
01124 001126 


me oe 
NG ONES IN UPPER BYTE) 


;CHECK THAT RHWC_HAS 0 
#0, SGDDAT 


15:11 PAGE 118 
FL oft 


MOV :GET GOOD = 0 
MOV IRHWC SBODAT ;READ RHWC FOR COMPARISON 
CMP $GDDAT,SBDDAT  ;COMPARE EXPECTED 

me WITH DATA READ FROM 
BEQ 955 ‘BRANCH IF GOOD 
ERROR 32 


AFTER SETTING “CLR” BIT #5 
:IN RHCSe TO INIT T 
‘AND WRITING A Bar TERN OF FLOATING 
ONES (WHICH IS 400, 1000, 2000, 4000, 
10000 20000 40000, to09 00) 
INTO R HOB OF 
READING. Rube THE 
OTR ok 
‘RHWC SHOU i AVE O 
: BUT CONTAINED WHAT IS 
ae :GIVEN IN BAD RHWC 


5 EERE REE EERE EERE KEL EAE E EERE EERE REARS EEE EERE AERA RARER AEE REERE 
EST 17 SILO TEST 7 (FLOATING O IN LOWER BYTE) 


AFTER A RH CLEAR IS GIVEN (SET BIT #5 IN RHCS2) 

RHCS2 IS CHECKED TO HAVE “IR” (BIT #6) HIGH, 

TOGETHER WITH UNIT NUMBER 

EIGHT WORDS OF FLOATING ZEROS 177776, 177775, 177773, 
S7, 177737, 177677, 177577 


,, H 
7 IN Pn -aeaa® WAITED FOR BY A TRAP 


INSTRUCTION CALLED ™ 
THEN RHCS2 IS CHECKED TO HAVE ma LOW AND 


ME 
“OR” HIGH TOGETHER WITH THE UNIT NUMBER 
R AN M 


wemwe ee 


ano meee rE CHECKED TO HAVE “IR ee 
HCS3, RHBA, RHBAE, wae ARE 


We DC DC DC DC RC De DC OC CDC De De ee. 


THEN RHCS1, 
CHECKED TO’ HBvE THE APPROPIATE’ 
[peERAMEa RR nanan enna naAea Aa RE ERE RERE RRA RE REREREEE 


ee 


001000 
000017 


040312 


000100 
005010 


OO46S6 


001124 
001124 


#STACK, SP ;RESET STACK 
MOV #17, a8#TSTNM :SAVE TEST NUMBER 
JSR PC, J#CLDISK GIVE RH INITIALIZE 


SETUP UNIT NU 
CLEAR RHWC AND FUNCTION BITS IN RHCS1 


:CHECK THAT RHCS2 HAS IR 
Mov #IR, SGDDAT 


:GET GOOD = 100 
BIS UNIT, $GDDAT 


; INCLUDE UNIT NUMBER 
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SILO TEST 7 (FLOATING O IN LOWER BYTE) 


T 
7672 O17737 164172 001126 MOV JRHCS2, SBDDAT 
6065 317808 24° 37 001124 001126 CMP S$GDDAT , SBDDAT 
001 
104 





MAINDEC-11-DERHAS-A 
DERHAB. SRC 17 


401 BEQ 65$ 
006 ERROR 6 


6083 177677, 177577 
6084 017712 012701 177776 MOV #177776,R1 
6085 017716 Ole702 Oo00010 MOV #8. 

6086 017722 O10177 164154 1S: MOV R1, JRHDB 
6087 017726 Ooco2 SEC 

6088 9017730 O06101 ROL Rl 

6089 017732 005302 DEC R2 

6030 017734 001372 

6092 017736 104411 

6093 017740 O04070 RHCS2 

6094 017742 O00200 OR 

$095 

£096 

£097 

£098 

60993 

6100 

£101 

6102 

6103 “CHECK THAT RHCS2 HAS 0 
6104 017744 012737 o00200 001124 MoV #OR, SGDDAT 
6105 017752 053737 OOSO1O0 001124 BIS UNIT. $GDDAT 
6107 017760 017737 164104 001126 MOV JRHCS2, SBDDAT 
6158 017766 623737 O01124 O01126 CMP $GDDAT; SBDDAT 
6110 

E111 017774 OO14O1 BEQ 673 

6112 017776 104023 ERROR 23 

£113 

6114 

6115 

6116 

611? 

£118 

£1193 


—_———— a 


: RHC 
BRANCH IF GOOD 
sAFTER SETTING TY THe #5 
. 8 HAVING DONE NOTHING 


~ $BUT CONTAINED WHAT IS 


608 ;WRITE EIGHT WORDS_INTO RHDB TO FILL IT 


608 :DATA IS FLOATING ZEROS 177776, 177775, 177773, 177767, 177757, 177737, 


BNE 1$ BRANCH 
juarT FOR OR BIT IN RHCSE REGISTER TO SET 


sRHCS2 
BRANCH IF GOOD 










;READ RHCS2 FOR COMPARISON 
COMPARE EXPECTED 
DATA WITH DATA READ FROM 


;IN RHCS2 TO INIT 


iRACS2 SHOULD HAVE IR 
TOGETHER WITH UNIT NUMBER 






;GIVEN IN BAD RHCS2 






;GETTING READY Ny FLOAT ZEROS 
; COUNTER 7 ld WORDS 
SWRITE aNY RHDB 


A 
:GET sePP ONE BIT LEFT 
IF 8 NOT DONE 


Q WAIT.T SUBROUTINE 

AND WAIT FOR OR BIT IN 
Le REGISTE 
3 IF ERROR OCCURS HERE 

MEANS wr we NOT . 

SET FOR THE F COUNT 
DOWN OF THE ATT. T FUT INE 
THIS TIME IS APPROXIMATELY 
LARGER THAN SOO MILLISECONDS 








;GET GOOD = 200 
INCLUDE UNIT NUMBER 
;READ RHCS2 FOR COMPARISON 


;COMPARE EXPECTED 
:DATA WITH DATA READ FROM 


sAF TER SETTING “CLR” BIT #5 

:IN RHCS2 TO INIT THE RH 

“AND HAVING WRITTEN A PATTERN 

:0F FLOATING ZEROS - 177776. 177 a 

177773 177757, re 134 77, 177877 


sRHCS2 SHOULD HAVE OR 





urutute 
tstue-€> 


cornrows § 
LItiGtuturururor 
(pip serut 


Taw St itt a 


| 


POO OOM rmwrg 
tw 


+ 0-2 + Bs b0 b# 0 p0 B= Bo pe 
SFALSEEZSSY 
~“C)..O00CIOUl£ Lund 9.0 


VU 


Ue 


Aero ari ai ati atislialiatisli sti aslisliatislistisleslislibleali alist islealialislislialislisti alist ali aleal ea 
CooPm moro aia uw 
GPA ote Cuneo SOU Ea 


0+ 0 +0 <0 +o +02 b+ Oo + b+ O-+ &0 & + bh * b 2 8 = = Ob bo he bh ho 0 0 he 


SNINNN OOo 
in satus 0),.000~) 
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DERHAS. SRC Ti? 


d20°09 


020034 


020034 
Ce0d42 


c23070 







35600 

TOGETHER WITH UNIT _ 
gut Se ab Y WHAT I 
:GIVEN IN BAD RHCS2 





MOV SIL “FIRST WORD TO BE READ 
; CHECK raat? poy HAS 177776 
MOV 4177776,$GDDAT :GET S00D = 0 


MOV JRHDB,SBODAT  § ;READ RHOS FOR EQhPARISON 
CMP $GDDAT,$8DDAT COMPARE 
;DATA WITH Basa READ FROM 


os ; BRANCH IF GOOD 


mi SETTING ‘ots BIT aS 

RHCSe TO INIT ce 
+ AND ee. 5 BATTEN OF FLOATING 
:ZEROS = 177776, 177775, 177773, 177767, 
177 7, 177737, 177677, 177577 
Tey RHDB TO Fit IT 


SEQ 
ERROR 





 RHOB TuoueD ge A777 
;8UT CONTAINED WHAT IS 
GIVEN IN BAD RDS 













MOV 3 SILONM | - SECOND WORD TO BE READ 
; CHECK THAT RHDB H BS 177 7775 
HOV #177775, $GDDAT ;GET GOOD = 0° 


MOV DRHOB, SBDDAT : READ B ARHOB FOR FOR rEgiPARISON 
CMP $co0at. S20DAT 
seena WITH DatAe Reap FROM 
:RHOB 
zis :BRANCH IF GOOD 


:AFTER SETTING “CLAM BIT 85 

IN ‘ath INgT Te 

iBND URETING 8 PATTERN OF ELORTING 
eon reer ipeape: pobgoes 177787. 
sea Bok (6 te’ f? 

ae GN READING RHOS THE 


IME 

:RHDB SHOULD yp 17777 
:BUT CONTAINED WHAT IS 
:GIVEN IN BAD RUDE 


ERROR 













io 
fu 
8 
“3 


920104 
O201le 


BEB ae 


(oO 
GJ 


020129 
JeQi2e 


Oeties 


PONTOON OOP Orrrrrmwe@a 
0+ + b= bs b= 2 B= b= be 0h -2 8-2 bb b eB 3 b= bo bo fo oho po Be 


S23124 
020132 
029140 





EO NURI ELIDA E Cane te BO ethos ID BEE 


CEO a Re ee 


020160 





Tu 


020160 
C2016 


020174 
Cedede 





it 
REY 


Ou) 
-OwoOnNo 


012737 
9 | 12737 
Q17737 
623737 


001401 
104084 


012737 
012737 


017737 
023737 


maCY11 


009003 
177773 


lé37r2 
001124 


o008S4 
177767 


163736 
001le4 


coocds 
177757 


163702 
001124 





SILO TEST 7? 


7 (732) 


004664 
001124 


003126 
003126 


CO46E4 
001124 


003 1e6 
001126 


OO4EEY 
001124 


001126 
001126 


738: 


753: 
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(FLOATING O IN LOWER BYTE) 
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MOV “THIRD WORD TO BE READ 
- CHECK mat? abo Has 771% 
Moy #177773, $GDDA T GOOD = 


MOV JRHOB, SBOOAT ;READ RHDB pun heat 
CMP SGDDAT.$BD0AT  ;COMPARE EXP 
:DATA WITH at READ FROM 


:RHDB 
738 BRANCH IF GOOD 


SEQ 

ERROR 24 
;AFTER SETTING “CLR” SIT #S 
SIN ata: TO a ae THE RH 
AND WRITING A PATTERN OF pee 
;ZEROS = 177776, 177775, 177773, 177767, 
; Ho Rog rae aks resets 


ips SHOULD HAVE. 177773 
SBUT CONTAINED WHAT IS 
SBIVEN IN BAD REDE ; 


MOV i QURTH WORD TO BE READ 
» CHECK rtat pope" HAS 177767 
MOv $17 776) SCDDAT :GET GOOD = 0 


MOV QRHDE,SBDDAT ;READ RYDE FOR COMPARISON 
CMP $GODAT,SEDDAT  :COMPARE EXPECTED 
:DATA WITH DATA READ FROM 


:RHOS 
BEQ 75$ BRANCH IF GOOD 


ERROR 24 
;AFTER SETTING Fo Bir 8S 
SIN mies T9 ym HE Ri 
SAND WRITING A PATTERN oF SESQRTING 
; RS, ° eee B 177 7773, ! 


toe 
177737 17767 > 177577 
: INTO ate TO Hh 
“THEN ON READING mi THE 
FOU TH TINE 


;RHOB SHOULD HAVE 177757 
:BUT CONTAINED WHAT IS 
;GIVEN IN BAD RHODE 


MOV -FIFTH WORD TO BE READ 
» CHECK mat? Auoa HAS 177757 
hoy #177757, scopat. :GET GOOD = 0 


MOV DRHDB,SSDDAT  ;READ RHDB FOR COMPARISON 
CMP $GDOAT,$BDDAT  :COMPARE EX? 
:ORTA WITH Daya READ FROM 
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SEANAS She Se Be Smee bt Sen HEEEA ot FEE | 




















6232 020210 001401 BEQ 775 "BRANCH IF GOOD 
p33 o2c212 104024 ERROR 24 et me rd 2 : 
es 8 
B5ae ices TAM rf Fae 
6236 AND WRITING A Sarr te “a FLOATING 
$237 :2EROS = 177776, 177775, lr?773, 177787, 
£338 2177757, 177737, 177677, 177577 
é s INTO RHOB TO FELL IT 
5249 a : THEN ON READING RHOB THE 
$241 ‘ :FT ty TIM 
Sede *RHDB SHOULD HAVE 177757 
£543 , :BUT CONTAINED WHAT IS 
5244 ta :GIVEN IN BAD RHDB 
6245 020214 773: 
= 
S248 O20214 oO12737 O00006 o04664 MOV 86, SILONM SIXTH WORD TO BE READ 
£249 ASHECK THAT RHO3 HAS 177 
E50 o20222 012737 177737 001124 #177737, $GDDAT eer G00D = 0 
6252 020230 017737 183646 001126 MOV DRHDB,SBDDAT #§ ;READ RHDB FOR PEOMPARISON 
6253 20238 623737 001124 O01126 CMP $GDDAT,$BDDAT  ;COMPARE EXP 
be5 ee :DAT WITH Basa READ FROM 
6256 020244 001401 BEQ 795 :BRANCH IF GOOD 
bes? ede4e 104024 ERROR 24 
£258 ple sAFTER SETTING “CLR” eI 8S 
£259 : IN RHCSe TO INTT THE R 
6250 AND WR TING A PATTERN OF SEQBTING 
- 261 ‘ZEROS = 177776, 177775, 177773, 177787, 
$262 2177757 i7rrap 177607" fe va 
- $263 ; INTO RDB To FIL 
264 : THEN N ON READING ne THE 
b265 :S1XTH TIME 
S266 :RHDB SHOULD HAVE 177737 
£267 _. $BUT CONTAINED WHAT IS 
5268 . !GIVEN IN BAD RHDS 
£263 020250 798: 












6271 “Sie 
£272 920250 012737 oO0007 cONsE4 MOV 87 SILONM ai SEVENTH WORD TO BE READ 

6273 - jCHECK THAT RHDB HAS 17767 

ber 020256 012737 177677 001124 MOV BI77677  SCUBAT ;GET GOOD = 0 

6276 O20264 017737 163612 001126 MOV DRHDB,SBODAT §;READ RHDB FOR COMPARISON 

6277 Oe0e72 622737 001124 O01126 CMP ScDDRT, $B8DDAT COMPARE EXPECTED 

bere iDATR WITH DATA READ FROM 

6229 920300 001401 BEQ 81$ :BRANCH IF GOOD 

S281 020302 104024 ERROR 24 3 

b282 sAFTER SETTING "CLR" B17 8S 

6283 :IN RHCS2 TO INIT THE R 

6284 "AND WRITING A PATTERN OF FLOATING 

gees *2EROS = 177776, 177775, 177773, 177767, 
S256 :177757, 177737, 177677, 177577 


:INTO RADB TO FILL IT 





a nn ee ee 
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DERHAB. SRC T17 SILO TEST 7 (FLOATING O IN LOWER SYTE) 






att] iE 4 mere ING RHOB THE 
2 haar 











$294 
6295 

737 4 MOV TH WORD T R 
peas 020304 012737 000010 OO0466 iiecK Het ae Has 1778 55oH ORD TO BE READ 
ps2 020312 O12737 177877 001124 8177577, scooAt ;GET GOOD = 0 
E535 020325 017737 163556 001126 MOV JRHDB , SBODAT ;READ RHDOB FOR COMPARISON 






6301 020328 023737 O01124 001126 CMP $cDDAT, SBDDAT 






S233 


OMPARE EXPECT 
:DATA WITH DATA READ FROM 












:RHDB 
6304 020334 901401 BEQ 83$ :BRANCH IF GOOD 
6305 020336 104024 ERROR 24 
£359 Th RucSS 10 fh 1f Sevan” 
$308 ; AND 0 ITING A PaTTERN OF FLOATING > 
pte pay 1052 Ae 53 boo 253° - boca, . 
6311 s INTO RHDB TO FILL IT 
6312 THEN ON READING” RHOB THE 
6313 SEIGHTH TIME 
6314 :RHDB SHOULD HAVE 177577 
6315 :BUT CONTAINED WHAT IS 
6316 :GIVEN IN BAD RHDS 
£317 
6318 
6319 









300 sCHECK THAT RHCS2 HAS IR 
bel 20340 012737 on0109 Do11e4 MOV —s8IR, SGODAT ;GET GOOD = 100 

pce C2036 063737 OOSCIO 0114 Bis UNIT SGDDAT =» INCLUDE UNIT NUMBER 

6324 020354 017737 163510 001126 MOV JRHCS2,SBDDAT READ RHCS2 FOR COMPARISON 

E205 Oe0s62 023737 O0i124 O0ll26 CMP  §GDDAT;$8DDAT ©; COMPARE EXPECTED 

Eset :DAY @_WITH DATA READ FROM 

6328 020370 O01401 BEQ «gS ;BRANCH IF GOOD 

6329 C2072 1042s ERROR 25 

6230 ;AETER SETTING "CLR" BIT #5 

63 SIN RHcS2 TO INIT THE RH 

B3 SAND WRTTING. A PATTERN OF FLOATING 

223 ZEROS - 177778, 177778, 170773, 177787, 







: Li 
£336 THEN ON READING RHOB THE 
6337 TOTAL 
5238 oe SHOULD HAVE IR 
6349 :TOGETHER WITH UNIT NUMBER 
6341 SBUT CONTAINED WHAT IS 
ese SBIVEN IN BAD RHCSe 
£343 920374 ess: 









MAINDEC-11-DERHAB-A 
DERHAB. SRC Tl? 


020374 
020% 
BS0¢16 


O204i§ 
020420 


OeC42e 
020422 


020430 
020436 


" o20444 
- 020446 


020459 
020450 
020455 
02044 


020472 
020474 





012737 
017737 
023737 


001401 
104026 


012737 
017737 
023737 


001461 
104027 


012737 
017737 
023737 


001401 
104030 
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o04200 001124 


ates 001126 
1124 O01le6 


ococes 001124 


16347& 001126 
001124 01126 


ocosed 9001124 


163402 001126 © 


001124 OO1ie6 


87S: 


89s: 


22-SEP-76 15:11 PAGE 124 
SILO TEST 7 (FLOATING O IN LOWER BYTE) 


F10 





‘HECK THAT RHCS1 HA 
hoy aovASROT Sco ‘e000 = 4200 


Moy QRHCS1, SBODAT ei fst £0 FOR COMPARISON 
: Dare WITH Baran Reap FROM 
873. ‘BRANCH IF GOOD 


EQ 
ERROR 26 tie “an” Oat 
Th Races sha ta 
NG A SATIEEN OF FLOATING 
ae, Bree 177775, 177773, 177767, 
Cer 15505 177677, 177577" 
: INTO mtg TO it 
: THEN ON READING bude THE 
:TOTAL 8 TIMES 
sRHCSI SHOULD HAVE DVA!RDY 


hi CONTAINED WHAT IS 
GIVEN IN BAD RHCS1 


:CHECK THAT RHCS3 HAS 0 
Mov #0, SGDDAT ;GET GOOD = 0 


MOV MRHCS3,SBDDAT  ;READ RHCS3 FOR COMPARISON 
CMP SGDDAT;$BDDAT  ;COMPARE EXPECTED 
:DATA_ WITH DATA READ FROM 


;RHCS 
BEQ 89s BRANCH IF GOOD 
ERROR 27 
;AFTER SETTING 7h BIT aS 
3 IN micos TQ INIT T 
AND WRITING A PATTERN we PL OAT ING 


:2EROS = 177776, 177775, 177773, 177767, 
177757, 177737, 177677, 5 7577 
: INTO RHDB TO FIL 
; THEN ON READING RHOE THE 
:TOTAL 9 TIMES 
:RHCS3 SHOULD HAVE O 


;BUT CONTAINED WHAT IS 
; GIVEN IN BAD RHCS3 


-CHECK THAT RHBA HRS 0 
Mov #0, SGDDAT ;GET GOOD = 0 


MOV RHBA,SBDDAT ;READ RHBA FOR EQtPARISON 
CMP aonens SBD0AT ; COMPARE EXP 
:DATA WITH Bata READ FROM 


PHBA 
$ BRANCH IF GOOD 


;AFTER SETTING “CLR” eit i) 
IN RHCS2 TO INIT THE RH 

AND WRITING A PATTERN OF FLOATING 
:ZEROS - 177776, 177775, 177773, 1777 


Q 91 
ROR 30 


767, 
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SILO TEST 7 (FLOATING O IN LOWER BYTE) 





MAINDEC-11-DERHAB-A 
DERHAB . SRC Tl? 








bY 177757, 177737, 177677, 177877 
euge : siNTO A rit bbe THE 

493 7 Tora clone Tits 

Fuge ti cONTAT D Dat IS 

, ee ac iM IND 

407 020476 91S: 

5408 “CHECK THAT RHBAE HAS 0 

B49 C2047 012737 O00000 001124 Mov 80, SGDDAT ;GET GOOD = 0 










B41] 020504 917737 163420 901126 MOV DRHBAE,SBODAT  ;READ RHBAE FOR COMPARISON 
6412 O205i2 023737 001124 901126 CMP SGDDAT,$BDDAT  ;COMP 
Bits sDATA WITH DATA READ FROM 
641S 020520 o01401 BEQ 93$ *BRANCH IF GOOD 
6416 O20522 104031 ERROR 31 
6417 sAFTER SETTING rcLR BIT #s 
6418 ?IN RHCSe TO INIT 
£419 x AND WRITING A PATTERN OF FLOATING 
6420 ZEROS = , 177775, 177773, 177767, 
6421 177757, 17773 177677, 177577" 
THEN 
OFAL 





B45? -'IGTVEN IN BAD RHBAE 







6428 020524 §3$: 
6429 : 3 CHECK THAT RHWC Sa 0 
6430 020524 012737 o0Cd00 001124 MOV #0, SGUDAT ;GET GOOD 0 












6431 

E432 20532 017737 163324 001126 MOV DRHWC,$BDDAT  § ;READ RHWC FOR COMPARISON 

6433 020540 623737 001124 001126 CMP $GDDAT,SBDDAT  ;COMPARE EXPECT 

6434 :DATA WITH DATA READ FROM 

6435 * RHWC 

6436 O20S46 001401 BEQ ss ‘BRANCH IF GOOD 

£437 O20550 104032 ERROR 32 

£438 sAFTER SETTING wun" oy 8S 

£439 IN RHCS2 TO INIT THE RH 

6440 AND WRITING A PATTERN OF FLOATING 
44] is *2EROS - 177776, 177775, 77ers, 177767, 
E442 | 5177787 177737, Rata 177577 
b443—Oi: NTO RADB TO ub 

B444 HVE ON READIN RHOB THE 

S445 :TOTAL 8 TIMES 

54 "RHIC SHOULD HAVE 0 

a : BUT CONTAINED WHAT IS 

B448 GIVEN IN BAD RHWC 

B449 g20ss2 95S: 







6452 +s LEERA HAA EA KERR SEALER RAR A ALAR RR RALE RARE RE RRAK ESSER RAR RARE RS 
6453 tLTEST T 20 SILO TEST 9 (FLOATING ZEROS IN UPPER BYTE) 


e455 ;% AFTER A RH CLEAR IS GIVEN (SET BIT #S IN RHCS2) 








H1iO 
SERRE SAR ERA Ree ee teeT SPE offing zeRos TA fi Ae 


TOSETER Hi ORT TO NueSER “IR” (BIT #6) HIGH, 
$77" 


A UBATTERN OF FLOATING ZEROS IN UPPER BYTE 
» 173777, 167777, 157777, 137777, 77777 


AND 
THEN RHCSI, RHBA, RHBAE, RHWC ARE 
CHECKED TO HAVE S36 APPROPIATE’ VALUE 
eee Se cae ee eee a ae 
ooco04 jue PE 
012706 001000 aby #STACK, SP sRESET STACK 
012737 000020 oo46s6 MOV #20, aaTtSTNM :SAVE TEST NUMBER 


004737 040312 JSR PC, d#CLOISK ;GIVE RH INITIALIZE 
;SETUP UNIT NUBER 
; CLEAR Rew AND FUNCTION BITS IN RHCS1 


oi Oe oie Oe he Oe he Oe ke OR De eke oe be 


;CHECK THAT RHCS2 HAS IR 
012737 000100 001124 Mov #IR, $GDDA nie ;GET GOOD = 100 


053737 605010 001124 BIS UNIT, S$GDDAT ; INCLUDE UNIT NUMBER 


017737 163256 001126 MOV MRHCS2,SBDDAT ;READ RHCS2 FOR COMPARISON 
023737 O0112e4 O01126 CMP $GDDAT,$BDDAT  ;COMPARE EXP 
;DATA WITH DATA READ FROM 


;RHC 
001401 BEG 65$ ;BRANCH IF GOOD 


104006 ERROR 6 
;AFTER SETTING “CLR” BIT #5 
IN RHCS2 TO INIT THE RH 
AND HAVING DONE NOTHING 


sELSE 
sree SHOULD HAVE IR 


TOGETHER WITH aT NUMBER 
5108 CONTAINED WHAT IS 
GIVEN IN BAD RHC es2 


;WRITE EIGHT WORDS INTO RHDB TO FILL IT 
:A PATTERN OF FLOATING ZEROS IN UPPER BYTE 
| *DATA IS - 177377, 176777, 175777, 173777, 167777, 
: 157777, 137772, $7777 
020626 012701 177377 OV #177 a7, Rl sGETTING REA READY TC FLOAT ZEROS 
020632 000010 : COUNTER 5 para WORDS 
Dede 163240 : Ri: SRHIOB sHATTE IN INTO RHOB 


0261 ET CARRY 
020644 Rl - - 3GET ZERO ONE BIT LEFT 
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LOATING ZEROS IN UPPER BYTE) 


02084 095302 : DEC 
020650 


saath ert mt OR BIT IN nest f any ie "9 =] ates 
o20652 104411 WAT ce at wall SUBROUTINE 
O20€54 004070 Rese FOR OR BIT 

o20856 600200 OR 


T ULL COUNT 
OF THE ATT. T oo 
‘THIS TIME IS APPROXIMATELY 
- ; LARGER THAN SOO MILLISECONDS 


. :CHECK THAT RHCS2 HAS OR . 
012737 oo0200 MOV #OR, SGDDAT GET coop = 200 
053737 O0S010 BIS uNIt. $GDDAT ; INCLUDE UNIT NUMBER 


017737 163170 MOV MRHCS2,$BDDAT  ;READ RHCS2 FOR COMPARISON 
023737 O0ile4 CMP $GDDAT,$BDDAT  ;COMPARE EXPECT 
DAT A_ WITH DATA READ FROM 


H 
001401 - BEQ 675 t BRANCH IF GOOD 


104023 ERROR 23 
;AFTER SETTING “CLR” eit #5 
IN RHCS2 TO INIT = 
AND HAVING WRITTEN 
PATTERN OF FLOATING EROS IN UPPER BYTE 
:1 175777, 173777, 
3187777, 1577774 137777, 77777 


:INTO RHOB TO FILL IT 
Re CS2 SH ud fave OR 


STOGETHER WITH UNIT NUMBER 
;BUT CONTAINED WHAT IS 
020714 ;GIVEN IN BAD RHCS2 


029714 012737 OD000! oO46E4 MOV “FIRST WORD TO BE READ 
+ CHECK rat? Lt HAS 177377 
020722 012737 177377 OO1124 MOV 8177377, SGODAT Stet GOOD = 0 


020730 017737 163146 O01126 MOV JRHDB, SBDDAT ;READ RHDB FOR COMPARISON 
020736 023737 001124 001126 CMP -$GDDAT,SBDDAT  ;COMPARE EXPECTED 
:DATA WITH DATA READ FROM 


: RHD 
020744 001401 BEQ 69$ BRANCH IF GOOD 


O2074e 1040e4 ERROR 24 
ON RA SETTING me BIT #5 
ye TQ INIT R 
og he A "PATTERN OF FLOATING 
1 IN U YTE 
:177377, 1PerP?, 178777, 173777, 
3167777, 157777, 137777, 27777 





MAINDEC-11-DERHAB-A 
DE 


RHAB. SRC 


021004 


021904 
0210le 
021020 
021026 


021034 
021036 


Te0 


012737 
912737 
017737 
023737 


001401 
104034 


012737 
012737 
017737 
023737 


001401 
104024 


MACY11 27(732) 
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4] 
SILO TEST 8 (FLOATING ZEROS IN UPPER BYTE) 


oo00te 
176777 


163112 
001124 


000003 
175777 


163056 
001124 


004664 
001124 


001126 
001126 


OO4EE4 
001124 


001126 
001126 


MOV #2, SILONM 
-CHECK THAT RHDB HAS 1 
MOV #176777, SGDDAT 


MOV QRHDB, SBDDAT 
CMP $GDDAT, SBDDAT 


BEQ 71$ 
ERROR 34 


MOV 
: CHECK That RAS. HAS 1 
Mov 5777, SGDDAT 


MOV JRHDB, SBDDAT 
CMP S$GDDAT, SSDDAT 


BEQ 73$ 
ERROR 24 


176777 


;INTO RHDB TO FILL IT 
; THEN ON READING RHOB THE 


RST_TIM 
RADE sHbu D HAVE 177377 


BUT CONTAINED WHAT IS 
:GIVEN IN BAD RHDB 


;SECOND WORD 70 BE READ 
GET GOOD-= 0 . 
;READ RHDB FOR COMPARISON 


COMPARE EXPECTED 
;DATA WITH DATA READ FROM 


BRANCH IF GOOD 


AFTER SETTING "tH BIT #5 
tIN RHCS2 TO INIT THE RH 
WRITING A ER BYTE OF FLOATING 


ZEROS m, UPPE 
3177377, 176777, 175777, 173777, 
5167772, 1597771 (bere, 77777 


: INTO RHOB 10 L IT 

: THEN READING URHOB THE 
: SECO NDT 
:RHOB SHOULB HAVE 176777 
BUT CONTAINED WHAT IS 
GIVEN IN BAD RHDB 


pTHIR WORD TO BE READ 
GET GOOD = 0 


;READ RHDB FOR COMPARISON 
COMPARE EXPECTED 
;DAT A WITH DATA READ FROM 


;RHD 
;BRANCH IF GOOD 


AFTER SETTING rcLR BIT #5 
sIN RHCS2 TO INIT THE RH 

AND WRITING A PATTERN OF FLOATING 
ZEROS IN UPPER BYTE 

77377, 176777, 175777, 173777, 
1167777 187777, 137777, 77777 
INTO RHDB TO FILL IT 
THEN ON READING RHOB THE 


;RHDB SHOULD ~. 47277 
BUT CONTAINED WHAT IS 
GIVEN IN BAD RHDB 





SERRE SRE eG SO tee SPCE oBFIRS zeRos fac dppER Bytes 
021040 738: 


012737 o00004 oo4EE4 MOV #4, SILONM “FOURTH WORD TO BE READ 
“CHECK THAT RHDB HAS 1 
012737 173777 001124 MOV #173777, scpoaT ;GET GOOD = 0 


017737 163022 001126 MOV JRHDB, SBDDAT ;READ RHDB om = 
3737 O011e4% 001126 CMP SGDDAT,SBDDAT  ;COMPARE EXP 
;DATA WITH BATA READ FROM 


901401 BEQ 75$ ? BRANCH IF GOOD 


104024 ERROR 24 
| ;AFTER SETTING “CLR” BIT #5 
?IN RHCS2 TO INIT THE RH 
* AND URTTING A PATTERN OF FLOATING 
ZEROS IN U YT 
:177377, 17679, 175777, 173777, 
£16772, 157777, 137777, 77777 
0 RHDB TO FILL 
THEN ON READING RHOB THE 
iE0U TH TIME 
RHDB SHOULD HAVE 173777 
sBUT CONTAINED WHAT IS 
GIVEN IN BAD RHOB 


012737 o00005 ocO4664 MOV ;FIFTH WORD TO BE READ 
; CHECK Tat? RADS. HAS 167777 
012737 167777 001124 MOV #167777,SGDDAT ;GET GOOD = 0 


017737 162766 001126 MOV @RHDB, SBDDAT ;READ RHDB per —_e on 
023737 OO1i24% OOlleb CMP SGDDAT,SBDDAT  ;COMPARE EXP 
DATA WITH BATA READ FROM 


; RHDB 
001401 BEQ 77$ BRANCH IF GOOD 


104024 ERROR 24 
. “ane ; AFTER a5 TG “CLR” BIT #5 
IN RHCS2 TQ 
ND WRITING A NPATTERN OF FLOATING 
PPER BYTE 


TO FIL 
IN READING RHDB THE 


 RHDB SHOULD HAVE 167777 
BUT CONTAINED WHAT IS 
GIVEN IN BAD RUDE 


021130 


021130 012737 OCO0006 oo4sE4 MOV #6, SIL -SIXTH WORD TO BE READ 
:CHECK THAT AhDS HAS 157 7h35 
021136 012737 157777 o01124 MOV #157777, SGDDAT ;GET GOOD = 0 





MAINDEC-11-DERHAB-A 
DERHAB. SRC Te0 


021220 


021220 
021226 
021234 
Oele4e 


021250 


017737 
023737 


001401 
104024 


012737 
012737 
017737 
023737 


001401 
104024 


012737 
012737 
017737 
023737 


001401 
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SILO TEST 8 (FLOATING ZEROS IN UPPER BYTE) 


162732 001126 
O0i1e4% 001126 


MOV 
CMP 


JRHDB, SBDDAT 
$GDDAT, SBDDAT 


BEQ 79$ 
ERROR 24 


;READ me BA... ne 
: COMPARE F PEG TED 
;DATA ith DATA READ FROM 


H 
BRANCH IF GOOD 
tN Rricee TO" IN TF aH BIT #5 
SAND WR rig eR avy RN OF FLOATING 


ZEROS IN UP 

3177 377, 176777, 175777, 173777, 

‘167777, 157772, 137777, 77777 
NTO RADE T FILL IT 


TREN READING HOB THE 
ONE 


8 

RHDB SHOULD HAVE 157777 
BUT CONTAINED WHAT IS 
;GIVEN IN BAD RHDB 


798: 
000007 OcO4664 MOV “SEVENTH WORD TO BE READ 
: CHECK Tat? Mri "HRs 137777 
137777 001124 Mov #137777, SGDDAT “CET GOOD = 0 
162676 001126 MOV JRHDB, $ SB008T ;READ RHDB FOR COMPARISON 
091124 0601126 CMP $GDDAT,SBDDAT  ;COMPARE EXPECTE 
od WITH DATA READ FROM 
BEQ 81$ :BRANCH IF GOOD 
ERROR 24 
;AFTER SETTING *oLR" BIT #5 
?IN RHCS2 TO INIT 
*AND WRITING A PATTERN OF FLOATING 
; ZEROS IN UPP ER BYTE 
-177377, 176777, 175777, 173777, 
2167777, 157777. 137777, 77777 
?INTO RHDB TO FILL IT 
IPN ON READING RHDB THE 
:RHDB cto ULD HAVE 137777 
:BUT CONTAINED WHAT IS 
GIVEN IN BAD RHDB 
815: 
000010 o04664 #8. , SILON -EIGHTH WORD TO BE READ 
MONECK THAT RHODE HAS 77727 
077777 001124 MoV 777,$GDDAT  ;GET GOOD = 0 
162642 001126 MOY JRHDB,SBDDAT  § ;READ RHDB FOR COMPARISON 
001124 O001126 CMP $GDDAT,SBDDAT  :COMPARE EXPECT 
at WITH DATA READ FROM 
BEQ 833 BRANCH IF GOOD 





DERMAB. SRC 


021252 


021310 
021310 
021316 
021324 


021332 
021334 









104024 


012737 
pea03 


017737 
023737 


001401 


104025 | 


012737 
017737 
023737 


001401 
104026 


MACY I e7 (732) 2 -SEP-76 1 
SILO TEST 8 (FLOATING ZEROS 
ERROR 
835: 
900100 001124 MOV 
905010 o01124 _ BIS 
162574 001126 MOV 
001124 001126 CMP 
BEQ 
ERROR 
SSS: 


oo4e00 001124 


162536 001126 
001124 001126 


hov 


MOV 
CMP 


BEQ 
ERROR 


a 


24 


; CHECK THAT RHCS2_ HAS IR 


T 
UNTt. $GDDAT 


ORHCS2, SBODAT 
SGDOAT, SBDDAT 


8s$ 
es 





;AFTER SETTING “CLR” BIT & 


ROP ANUd rf room 
;ZEROS IN BYT 


N UPPER 
3177377, 176777, 2198777, 173777, 
7, 157777, 137 ’ 22777 
PINTO RHDB TO FILL 
sTHEN On, ON READING ae ne 
: RHDB BA0u ULD HAVE 77 
:BUT CONTAINED WHAT 1S. 
‘GIVEN IN BAD RHDB 


;GET GOOD = 100 
; INCLUDE UNIT NUMBER 


;READ nie cite COMPARISON 
;COMPARE EXP 
;DAT A WITH BATA. READ FROM 


* BRANCH IF GOOD 


;AFTER SETTING ae aL aS 
sIN RHCSe TO INIT 
WRITING A PATTERN” OF FLOATING 
i OEROS IN UPPER BYTE 
pte 7, 176777, 175777, 173777 
2770) 1572774, 137777, 77777 ° 


TO FILL 
$ NTO ON READING RHDB THE . 
TOTAL 8 T 
sRHCSe SHOULD HAVE IR 
TOGETHER WITH at + Gree 


:BUT CONTAINED W 
;GIVEN IN BAD RHC ese 


;CHECK THAT RHCS1 HAS DVA!RDY 


#DVAIRDY,SGDDAT ;GET GOOD = 4200 


@RHCS1, $8DDAT 
$GDDAT , SBDDAT 


87$ 
26 


;READ RHCS1 aa... COMPARISON 
COMPARE EXP 
DATA WITH ATR READ FROM 


sRHCS 
BRANCH IF GOOD 


;AFTER SETTING “CLR” BIT #5 

IN RHCS2 TO INIT THE RH 

AND rg A ae OF FLOATING 
;ZEROS_IN UPPER 

:177377, 16077, 178777, 173777, 
167777, 157777, 137777, 77777 
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MAINDEC-11-DERHAB-A ) 
FLOATING ZEROS IN UPPER BYTE) 


Yi 
DERHAB. SRC Ted SILO TES 


6792 sINTO RHDB TO FILL IT 
6793 THEN ON READING RHOB THE 
ue EYE ve oo 
6797 SORONTAINED WHAT IS 

67 ‘aur cov ANE Ned 

6799 021336 975: 

6800 »"E0K THAT RHCS3 HAS O 

a 021336 912737 000000 oD1124 Mov #0, SGDDAT ;GET GOOD = 0 

POS opisuy gI7737 162562 001126 MOV @RHCS3,$BDDAT  ;READ RHCS3 FOR COMPARISON 
6804 O21352 023737 001124 001126 CMP  SGDDAT SBDDAT  :COMPARE EXPECTED 

5805 :DATR WITH DATA READ FROM 


6805 

6807 021360 001401 BEQ 99g i BRANCH IF GOOD 

6808 021362 104027 ERROR 27 

6809 sAFTER SETTING “CLR BIT 4S 
6810 | ‘IN RHCSe TO INIT 

68il AND WRITING A PATTERN OF FLOATING 
6812 :ZEROS IN UPPER 

6813 5177377, 176777, 178777, 173777, 
6814 167777, 157777, 137777, ? 
6815 INTO R Rind to FIL 

6816 THEN ON READING. RHOB THE 


6820s 'GIVEN IN BAD RHCS3 


6821 021364 89S: 
6822 ;CHECK THAT RHBA_HAS O 
6823 021364 012737 O00000 O01124 MOV #0, SGDDAT ;GET GOOD = 0 


6825 021372 017737 162466 001126 MOV JRHBA,SBDDAT  §;READ RHBA FOR COMPARISON 
6826 O21400 023737 001124 O01l25 CMP $GDDAT,SBDDAT  :COMPARE EXPECTED 
bBe? sDATR WITH DATA READ FROM 
£829 O21406 O01401 BEQ 915 ‘BRANCH IF GOOD 
6830 021410 104030 ERROR 30 
- 6831 AFTER SETTING rcLR™ er aS 
£832 "IN RHCS2 TO INIT THE R 
6833 AND WRITING A PATTERN OF FLOATING 
6234 ZEROS IN UPPER BYTE 
6835 : 177377, 176777, 175777, 173777, 
£836 3167777 157777, 137777. 77777 
. 6837 “INTC RADB TO FILL IT 
6839 7 : THEN ON READING RHOB THE 
£839 ; TOTAL g TIMES 
6840 ‘ RHBA SHOULD H EO 
684 BUT CONTAINED “Nhat IS 
684 GIVEN IN BAD RHBA 
6843 O21412 918: 
ce44 :CHECK THAT RHBAE HAS O 
BENS C21412 012737 900000 001124 MOV #0, $GDDAT :GET GOOD = 0 
sREAD RHBAE FOR COMPARISON 


| £847 O2i420 017737 1&2504 001126 MOV ORHBAE , SEDDAT 


COOOL OTT 
yar ol 


in0n09 C9 GO 
OM” UPUN LG 


NUNN Tata 


to 





' 


021426 


021434 
021436 


021440 
021440 
D21446 
O31454 


321462 
SEl4e5 


S21466 


L1-DERHAS-8 
20 


22-SEP-7 
‘STRLOAFING 2FRos TA Leite 


0011284 01126 


MO ok 


. 
, 
. 
, 
. 
, 
. 
J 
. 
, 
° 
a 
. 
‘ 
© 
, 
7 
, 
’ 
7 
, 


CMP SGODAT , $8DDAT Ora at EXPECTED 
A_WITH DATA REGO FROM 


ay 
BEG ey BRANCH IF GOOD 
4 Ab a5 TING “CLR” SIT #& 


IN RHCS2 TO INIT THE RH 
: AND LRITING. a gett RN OF FLOATING 





ZEROS IN 
2177 176777, 175777, 173777, 
tbS3o5° eee iver, 59997 
tRTO R RHD8 TO FIL 
THEN ON READING Euee THE 
sTOT AL 8 TIMES 


RHBRE SHOULD HAVE 9 
:BUT FONTATNED WHAT IS 
;GIVEN IN BAD RHBOE 


;CHECK THAT RHWC ve 0 


Mov 80, $GDDAT ;GET GOOD = 0 
MOV SRHWC,SBODAT —_; READ RHWC FOR COMPARISON 
CMP $GDDAT,$BODAT  :COMPARE EXPECTED 
Dare WITH DATA READ FROM 
35$ :BRANCH IF GOOD 


BEQ 
ERROR 32 
sAFTER SETTING “CLR” i 


: BN HE R 
3AND WRITING A PATTERN OF FLOATING 
ize UPPER BYTE 


176777, aig 
ilbri7e, tegen 137277, 3997? 
9 RHOB 8 TO FILL 
READING busy THE 
HTOta TIMES 
HWC SHOULD HAVE 0 
Pity “ BNTATNED WHAT IS 
:GIVEN IN BAD RHWC 


5 RERRERARRARERREAREASEAP AREAL RRARREARRREAREEALARREREA PAL AELEREEE 
ST 2l RHCS1 - MCPE BIT #13 (PARITY LINE = 0) 


AN RH CLEAR (SET BIT % IN RHCS2) IS GIVEN TO 
re ALL DEV ACE REGISTERS 
as” HER] (ERROR REGISTER 1) IS CHECKED TO HAVE 


ROS 
SET “PAT” (BIT #4 IN RHCSe) il a PARITY CHECKING 
Reap ANY DEVICE REGISTER 

AD AND CHECK RHCS1 TO CONTIN gC (BIT #15) 


CPE (BIT #13) 
WRITE "1" INTO TRE (BIT #14 IN RHCS1) 
READ RHCS1 SC, MCPE, AND RDY SHOULD BE SET 
GIVE AN RH CLEAR (CLR - BIT #5 IN RHCS2) 
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DERHAB. SRC Tel RHUS1 - MCPE arr #13 \PARITY t NE = 


£304 :# CHECK RHCS1 TO HAVE RDY 
$39 :* CHECK RHCSe 10 wave ONLY IR PND UNIT NUMBER 

Fake it CHECK SF RHCS3, RHBA, RHBAE, RHWC TO HAVE APPROPIATE 

359 ° + EERERREREEEREREERERE SEE EESEREE ES ELSES LEER REREESEEEEESES ESE ESS 
6303 O2146$ 000004 tét21: SCOPE 

§$19 Seis7o Sie7ds 001000 MOV aSTACK, SP sRESET STACK 

pi Sei474 Oler7s? 0002; coves MOV g21,a8tSTNM :SAVE. TEST NUMBER 

Se 

6513 o21S8e SoN7S7 040312 ISR PC, JeCLDISK GIVE | RH INITIALIZE 

§$15 :SETUP UNIT NUS 

e315 :CLEAR RHWC AND FUNCTION BITS IN RHCS! 
Je 

£9i7 

ssig -CHECK THAT RHERL HAS 0 

$213 021506 912737 oc00000 001124 MOV 80, $GODAT :GET GOOD = 0 

$21 021514 O17737 162354 001126 MOV DRHERI,SBDUAT  ;READ RHERI of oe COMPARISON 

6922 621522 623737 801124 O01126 CMP $GDDAT;S$BDDAT . : COMPARE EXP! 

3e3 : ;DAT B MITH Baga READ FROM 

Fase 001: BEQ S$ BRANCH IF GOOD 


; 002492 
32 104033 ERROR 33 


926 Oe 7 

&$27 wie QE TER SETTING “CLA BIT 815 
&$28 TIN RHCS2 TO INIT 4 
£329 ces SAND HAVING DONE NOTHING ELSE 
£330 oe: ZRHERL SHOULD HAVE O 

£931 :BUT CONTAINED WHAT IS 

£933 - ae :GIVEN IN BAD RHERL 


Pas ;T0 g Avent Oe mae CHECKING ON THE CONTROL BUS 
= i 
Pano Ceisss OS2777 000020 162326 ir§ sPAT, JRHCS2 ;SET ‘PAT = 20 IN RHCS2 


6349 ;CHECK THAT at HAS 0 

Faas O2iS42e Ole737 000000 001124 hoy #0, $GODAT 3GET GOOD = 0 

6943 021550 017737 162320 001126 MOV DRHER1,SSODAT . ;READ RHER1 FOR COMPARISON 
6944 021556 023737 O0112e% OO0ll2e6 CMP $GDDAT;$BODAT  ;COMPARE EXPECTED 

Pale ;DATA WITH DATA READ FROM 
6947 021564 001401 ~ BEQ &7$ BRANCH IF GOOD 

6948 OelS66 104034 - ERROR 34 . 

6949 gee ;AFTER CLEARING THE RH AND 
6950 . ;DEVICE BY AN RH CLEAR 


£955 : GIVEN IN BAD RHERL 
6956 021570 78: 


e958 ;HAVING READ RHER] WITH WRONG PARITY BEING 
:CHECKED MCPE - BIT #13 AND SC BIT #15 IN RHCS1 SHOULD BE SET 










DERHAB. SRC 








MAINOEC oT ia 


C 
Ole777 040000 isee34 Mov #TRE, JRHCS1 WRITE "1" INTO TRE IN RHCS} 


02373? O0lie4 OOlle6 CMP $GDDAT,$80D8T  ;COMPARE EXP 


te :RHCS 
001401 BEO 718 :BRANCH IF GOOD 
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RHCS1 - MCPE BIT #13 (PARITY LINE = 0) 






;CHECK THAT RHCS1 HAS 4200 








012737 004200 001124 Mov #4200, $GODAT ;GET GOOD = 124200 
Ol7r3? iseeS& 001126 MOV JRHCS1,S$80DAT  ;READ RHCS1 FOR COMPARISON 
O23737 O0lie4 O0lle6 CMP $GDDAT,SBDDAT  ;COMPARE EXPECTED 

space WITH DATA READ FROM 
001401 BES 638 SBRANCH IF GOOD 
104035 RROR 35 





SAFTER CLEARING THE RH AND 





siteat 
‘BUT ONTRINED WHAT IS 
;GIVEN IN BAD RHCS1 






;WRITE A “ONE INTO TRE yo - BIT #14) 
THIS SHOULD NOT CLEAR M 








; CHECK . THAT RHCS1 HAS 104209 
O12e737 104200 001124 Mov #104200,$GDDAT ;GET GooD = 124200 


017737 ib2e2e O01leb MOV @RHCS1,SB8DDAT  ;READ RHCS1 as 










:DATA WITH DATA READ FROM 







104036 ERROR 36 





;AFTER CLEARING THE RH AND 
SDEVICE REGISTERS BY AN 


L 
sRHER WAS CHECKED TO HAVE 
sRONG PS eta WAS 









N TO_TR 
:RHCS| SHOULD HAVE 104200 


=124 
BUT CONTAINED WHAT IS 
GIVEN IN BAD RHCS! 








718: 


;NOW ERRORS WELL BE CLEARED BY RH _ 
“SET "CLR" pts #5_IN 
012777 OOOD40 162210 HOV #CLR, DRHCS2 Me EL EAR BY RH INIT 

013777 OOSG!9 lbeede MOV UNIT. JRHCSe :REINSTATE AUNT NUMBER 





ao ae 
Tel 


012737 
017737 
023737 


001401 
104037 


012737 
053737 


017737 
023737 


00140 
10404 


021750 


021750 012737 000000 001124 


MACY] &7(732) 


004200 001124 


162160 O0l126 
001124 O0i1e6 


001124 
001124 


001126 
001126 


000100 
005010 
162134 
001124 


22-SEP-76 15:11 PAGE 136 
RHCS1 - MCPE BIT #13 (PARITY LINE = 0) 


733: 


758: 


;CHECK THAT RHCS1 HAS DVAIRDY 


MOV #DVA' ROY, SGODAT 
MOV JRHCS! , SBODAT 
CMP $GDDAT, $BODAT 


EQ 
RROR 


sCHECK THAT RHCSE HAS IR 
Mov #IR, $GDDAT 

BIS UNIT, $GDDAT 

MOV JRHCS2, SBDDAT 
CMP $GODAT. S8DDAT 


BEQ 75$ 
ERROR 40 


“CHECK THAT RHCS3 HAS 0 
MOV #0, SGDDAT 


;GET GOOD = 4200 

; READ page poe COMPARISON 
s COM ARE EXE TED 

spree” TH BATA READ FROM 
;BRANCH IF GOOD 


;AFTER CLEARING THE RH AND 
sDEVICE REGISTERS BY AN 


;RH_ CLE 
Pe WAS CHECKED TO HAVE 


ONG PARITY ee tING WAS 
RHCS2 


T NR 
:RHCSI SHOULD HAVE DVAIRDY 


=4200 
‘BUT CONTAINED WHAT IS 
GIVEN IN BAD RHCS1 


;GET GOOD = 100 
; INCLUDE UNIT NUMBER 
;READ RHCSe FOR COMPARISON 


SCOMPARE EXPECTED 
;DATA WITH DATA READ FROM 


BRANCH IF GOOD 


;AFTER CLEARING THE RH AND 
sDEVICE REGISTERS BY AN 


iSrRe WAS CHECKED TO HAVE 

NG PARITY CECH ING WAS 

SET BY “PAT™ BIT IN RHCS2 
Rl WAS READ TO SET 
RHCS1 


1” INTO TRE 
TTING “CLR” rh RHCS! 
HOULD HAVE I 


37 

iRise 

STOGETHER WITH UNET Ween 
T 


:BUT CONTAINED WH 
GIVEN IN BAD RHCS2 


;GET GOOD = 0 





MAINDEC-11-DERHAS-A MACY11 27(732) 22-SEP-76 15:11 PAGE 138 
DERHAB. SRC Tel RHCS1 - MCPE BIT #13 (PARITY LINE = 0) 


“ 


“gun 
>< 0 -< &-< 0 p< 9 -< 6 <p — ~ 


;RH CLEAR 
;RHERL WAS CHECKED TO HAVE 
PARITY C ine WAS 


~s 
-- 
wee 


:RHERI WAS READ T 

:MCPE AND SC_IN RHC 

:0N WRIT INTO. TRE 

jTHEN SETTING “CLR" IN RHCS! 
RHBAE SHOUL 

:BUT CONTAINED WHAT IS 

:GIVEN IN BAD RHBAE 


“INI 


818: 
;CHECK THAT RHWC HAS 0 
O1e737 000008 001124 hov #0, SGDDAT ;GET GOOD = 0 


017737 161776 001128 = MOV @RHWC , SBODAT ;READ RHWC oeer COMPARISON 


023737 001124 001126 CMP $GODAT, SBDDAT 5 COMP ARE _EXP 
;DATA WITH BATA READ FROM 


; ; RHWC 
OOiW0l1 ~ ° ; BEQ os BRANCH IF GOOD 


104044 
;AFTER CLEARING THE RH AND 
;DEVICE REGISTERS BY AN 


;RH_ CLEAR 
ea WAS CHECKED TO HAVE 
NG PARITY gr ine es 


INTO TRE 
: THEN SETTING ae IN RHCS1 
;RHWC SHOULD 
BUT CONTAINED WHAT IS 
835 ;GIVEN IN BAD RHWC 


Le mag om ya gat 5 Ie apenas 
TEST 22 RHCS1 - MCPE BIT #13 (PARITY LINE = 


AN RH CLEAR (SET BIT #5 IN RHCS2) IS GIVEN TO CLEAR 
ALL DEVICE REGISTERS 
WRITE A ONE INTO DISK ADDRESS REGISTER (RHDA) 
V REGISTER) 
#4) THIS WILL INVERT THE PARITY CHECKING 


eowe 


WC RC OK CC KC CK pa 


-e 


eee wees es ee es ee ee ee 


K RH Y 
as ECK RHCS2, RHCS3, HBR, RHBAE, RHWC TO HAVE APPROPIATE 


a VAL 
7180 5 RELRRRAAE ARAL LE RELA AAA RAAALLARAAA LAA LALA LARA RAAARALALRALARERARE 
7181 022190 00004 tST22: SCOPE 

7182 022192 012706 001000 MOV —s-s#STACK, SP sRESET STACK 

ries Gecice O1273? Oo0dee O04esE MOV wee,aatSTNM © ;SAVE TEST NUMBER 





11 


tal! St Cae, MACY11 27(732) 22-SEP-76 15:11 PAGE 139 
DERHAB. SRC é2 RHOS1 - MCPE BIT #13 (PARITY LINE = 1) 


71 
7185 022114 OO04737 040312 JSR PC, deCLOISK ;GIVE RH pHt rte, ize 
;SETUP UNIT NUB 


: CLEAR AND FUNCTION BITS IN RHCS1 


WRITE A ist hg RHDA - ESS REGISTER 
TIS ater? 2 Ri it 8 ives Pe READIN T HFC FRAME COUNT” 
SAF TE ADING THIS REGISTER 


THE conta ak Pair LINE Pm A poe 
N TAPE DRIVES CALLED RHFC 


- INVERT THE PARITY TO = CHECKED BY SETTING “PAT” BIT #4 IN RHCS2 
052777 000020 161734 BIS #PAT, ARHCS2 ;SET PAT IN RHCS2 


012777 900001 161740 hov 


ININDNININI I 
0 0 b-- b-2 9-2 pho 2 pe pe 


OPP 0:00:00 :0 2B DMD iD 


;CHECK THAT _RHDA HAS BITO 
012737 000001 Od0112e4 MOV #8170, S$GDDAT ;GET GOOD = 1 


017737 161720 001126 MOV JRHDA, SBDDAT ;READ RHDA FOR COMPARISON 
023737 901124 COlleb CMP SGDDAT,SBDDAT  ;COMPARE EXPECTED 
DATA WITH DATA READ FROM 


?RHDA 
001401 BEQ 655 :BRANCH IF GOOD 
104045 4c 
aa AN RH CLEAR "1" 
WAS WRITTEN a 4s ROURESS REGISTER 
(FRAME COUNT. IN 
;PAT IN RHCS2 ih," er 
; THEN THE ADDRESS REGISTER 
WAS READ BACK 
; RHOA SHOULD HAVE BITO 


BUT CONTAINED WHAT IS 
GIVEN IN SAD RHDA 


sCHECK THAT RHCS1 HAS 4200 
022162 012737 oO4200 001124 Mov #4200, $GDDAT ;GET GOOD = i24C00 


O22170 017737 161664 001126 MOV JRHCS1,SBDDAT ~ ;READ RHCS1 FOP? COMPARISIN 
-O2e176 023737 001124 001126 CMP $GDDAT;SBDDAT  ;COMPARE EXPECTED 
;DATA WITH DATA READ FROM 


sRHCS1 
022204 0601401 BEQ 67$ BRANCH IF GOOD 
Oeeede 


104046 ERROR 46 
;AFTER AN RH CLEAR “1” 
sas WRITTEN INTO we REGISTER 
RAME COUNT IN TAPE) 


SPAT IN RHCS2 WAS "SET 

; THEN THE ADDRESS REGISTER 
;WAS READ 

sR OLD HAVE 4200 


=1e4 
;BUT CONTAINED WHAT IS 
: GIVEN .IN BAD RHCS1 
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RHAB. SRC Te2 RHCS1 - MCPE BIT #13 (PARITY LINE = 1) 


022210 

; CHECK wae 1 BaeSe HAS _IR! PAT 
Oe2210 012737 090120 00 OV DDAT ;GET GOOD = 120 
Oeeel& OS3737 005010 UNIT, rscobaT INCLUDE UNIT NUMBER 


022224 AE LG 61640 JRHCS2,SBDDAT ;READ RHCS2 FOR COMPARISON 
O2ee32 023737 001124 MP SGDDAT,SBDDAT  ;COMPARE EXPECTE 
;DATA WITH DATA READ FROM 


;RHCS2 
BRANCH IF GOOD 


;AFTER AN RH CLEAR “1” 
shes RAE COUNT mo cess REGISTER 


0 
T IN RHCSe WAS SET 
Ten Te THE a REGISTER 
sRHCS2 SHOULD HAVE IR!PAT 


TOGETHER WITH iat NUMBER 
BUT CONTAINED WHAT IS 
GIVEN IN BAD RUCSE 


022240 
dese4e rat, 


695: 
;CHECK THAT RHCS3 HAS 0 
012737 900000 001124 MOV #0, SGDDAT ;GET GOOD = 0 


017737 161654 001126 MOV QRHCS3,SBDDAT  ;READ sige <I re COMPARISON 
023737 O0lle4% OOlleb CMP $GDDAT,SBDDAT  ;COMPARE EXP 
;DAT A WITH BATA READ FROM 


66 001401 BEQs718 IBRANCH IF GOOD 


104050 ERROR 50 2 
;AFTER AN RH CLEAR ™ 
WAS WRITTEN INTO ADDRESS REGISTER 
; (FRAME COUNT IN TAPE) 
PAT IN RHCS2 WAS SET is 
: THEN THE aoe REGISTER 
: WAS READ 
;RHCS3 SHOULD. HAVE 0 
;BUT CONTAINED WHAT IS 
GIVEN IN BAD RHCS3 


022272 718: 
Oe227e 012737 O00000 001124 HOV #0, SGDDAT ;GET GOOD = 0 
022300 017737 161560 001126 MOV JRHBA , SBDDAT ;READ RHBA aoe COMPARISON 
022306 023737 001124 001126 CMP $GDDAT,$BDDAT  ;COMPARE EXP 

:DATA WITH BATA READ FROM 


: RHBA 
022314 001401 ‘ -  BEQ 73$ SBRANCH IF GOOD 


;CHECK THAT RHBA HAS 0 


Cee3sié 104051 ERROR 51 
;AFTER AN RH CLEAR “1” . 
WAS WRITTEN INTO ADDRESS REGISTER 
; (FRAME cont IN TAPE) 


IN RH SET 
‘THEN THE mrss REGISTER 
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MAINDEC-11-DERHAB-A 
DERHAB. SRC Te2 RHCS1 - MCPE BIT #13 (PARITY LINE = 1) 


oo0c00 001124 


161576 001126 
001124% 001126 


oooces 9001124 


161 
O011e4% 001126 


iiTest 23, TEST DUPLICATED Alo (RHCSI BIT #8) 


WK KE IK DK oie i oe * 








;WAS READ BACK 

;RHBA SHOULD HAVE 0 
sBUT CONTAINED WHAT IS 
:GIVEN IN BAD RHBA 


:CHECK THAT RHBAE HAS 0 
Mov #0, $GDDA ;GET GOOD = 0 






















MOV MRHBAE,SBDDAT  ;READ RHBAE FOR COMPARISON 
CMP $GDDAT, SBDDAT ba ih: xPECT ED ; 
A WITH DATA READ FROM f 
\ 
SEQ 753 + BRANCH IF GOOD ti 
ERROR Se f 
;AFTER AN RH CLEAR “1” ' 
WAS WRITTEN. INTO AQoRESS REGISTER 
: (FRAME COUNT IN are) 
‘PAT IN RH 
j THEN THE RODRESS SEGISTER 
;WAS R EAD 





age SHOULD. HAVE 0 
BUT CONTAINED WHAT IS 
;GIVEN IN BAD RHBAE 






:CHECK THAT RHWC_HAS 0. 
MOV #0, SGDDAT ;GET GOOD = 0 


MOV JRHWC , SBDDAT ;READ RHWC pon ee nn { 












CMP $GDDAT,SBDDAT  ;COMPARE EXP 
DATA WITH BATA READ FROM 


; RHWC 
773 :BRANCH IF GOOD 


BEQ 
ERROR 53 
; ATER AN RH CLEAR "1" 
WAS ty INTO_ADDRESS REGISTER 
: (FRAME COUNT IN TAPE) 
PAT IN RHCS2 WAS SET 
THEN THE ADDRESS REGISTER 
WAS READ BAC 
;RHWC SHOULD HAVE O 
:BUT CONTAINED WHAT IS 
:GIVEN IN BAD RHWC 




























T 23 TEST DUPLICATED Al6 (RHCS1 BIT #9) “J 


CLEAR THE SUBSYSTEM BY A CONTROLLER CLEAR (RHCS2 BIT #5) 
MOVE 400 (ONE INTO Al6) IN RHCS 

READ RHCS1 TO CONTAIN 600 (BIT #8 AND RDY) 

READ RHBAE TO CONTAIN “1” (BIT #0 HIGH) 


MOVE O INTO_RHBAE (WRITING 0 INTO RHBAE BIT #0) 
READ RHBAE TO CONTAIN 0 
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7352 :# READ RHCS1 TO CONTAIN ONLY RDY (BIT #8 IN RHCS1 IS ZERO) 
ged | Pe ee eeneneeneneeneenneceeneeneneennaneae eaters 
7356 022274 ocooo4 #6723: SCO 
7357 022376 612706 901000 MOV #STACK, SP RESET STACK 
7358 O2e402 012737 000023 oD4Es6 MOV #23, a8TSTNM -SAVE TEST NUMBER 
7360 022410 004737 040312 JSR PC, JHCLDISK sGIVE RH INITIALIZE 
e361 seve NIT NUBER 
sabe CLEAR RAC AND FUNCTION BITS IN RHCS1 


7364 -WRITE "1" INTO Al6 IN aire 
736 022414 012777 OO00400 161436 MoV #A16, IRHCS1 ;MOVE 400 INTO RHCS! . 


7369 ‘ , ;CHECK THAT RHCS1 HAS ALE!DVAIRDY 

70 Oeetee O1e737 OO4600 O0ile4 Mov #A16!DVA!RDY, SGDDAT ;GET GOOD = 4600 
7372 022430 017737 161424 001126 MOV @RHCS1,$BDDAT ;READ RHCS1 oat COMPARISON 
7373 Oe2e436 023737 O0112e4% 001126 CMP $GDDAT,$BDDAT  ;COMPARE EXP 

gar ; sary wate BATA READ FROM 
7376 O22444 001401 BEQ 65S ;BRANCH IF GOOD 

7377 Oee446 104054 ERROR 54 

7378 ;AFTER SETTING “CLR” © aS 
7379 sIN RHCSe TO_INIT THE R 

7380 AlG WAS WRITTEN INTO RHCS! 
7381 ; :RHCSI WAS Ri 

7382 : :RHCS1 SHOULD HAVE ALB!DVA!IRDY 
7383 :=46 

7384 ‘Bur CONTAINED WHAT IS 

7385 :GIVEN IN BAD msi 

7386 022450 6S$: 


7389 ;CHECK THAT RHBAE HAS BITO 
7390 O22450 012737 000001 O0112e4 MoV #BITO, SGDDAT ;GET GOOD = i 


7391 

7392 =O22456 017737 161446 001126 MOV MRHBAE,SBDDAT ;READ RHBAE FOR COMPARISON 
7393 Oe2464 023737 001124 001126 CMP $GDDAT,$BDDAT  ;COMPARE EXPECT 

7394 ‘DATA WITH DATA READ FROM 
7335 : RHBAE 

7396 922472 001401 BEQ 67$ BRANCH IF GOOD 


7397 022474 104055 ERROR 55 3 . _ 


7398 ;AFTER SETTING fh BIT #5 
7399 IN RHCS2 TO INIT THE RH 
7400 3Al6 WAS WRITTEN INTO RHCS1 


Oe E D 
a  RHGRE SHOULD RAVE BITO 
7405 T_ CONTAINED WHAT IS 
7405 Tes IN BAD RHBAE 


7407 O2e476 675: 
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022476 


OeeS0e 


beesie 


022524 
OeeSe6 


022530 


022530 


022536 
OeeS44 


Oe25Se 
Oeess4 


022556 


008077 


012737 
p47738 
, 923737 


001401 
104056 


- 


012737 
017737 
023737 


001401 
104057 


MACY11 27(732) 






000000 001124 


004200 001124 


161316 O01126 
001124 001126 


24 


CLR 


hov 


MOV 
CMP 


BEQ 
ERROR 


MOV 


MOV 
CMP 


BEQ 
ERROR 
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TEST DUPLICATED Al6 (RHCS1 BIT #8) 


; NOW toe * 0 ‘oe RHBAE (WRITING O INTO RHBAE BIT 80) 


HECK ie TSCBAT HAS 0 


ScDbAT; SeDDAT 


69S 
SE 


;CHECK THAT RHCS1 HAS DVA!IRDY 
#DVAIRDY,SGDDAT ;GET GOOD = 4200 


@RHCS1, $SBDDAT 
$GDDAT, SBDDAT 


71$ 
7 


1 = tag aye TS Te eee [ 
TEST TEST DUPLICATED Al7 (RHCS1 BIT #9) 


Race 
;BRANCH IF GOOD 












;WRITE ZERO INTO RHBAE 


;GET GOOD = 0 

RE PARE RHEE FRR COMPARISON 
sDATR hirTH DATA READ FROM 
BRANCH IF GOOD 


;AFTER SETTING fan ri #5 
IN RHCSe TO_INIT 

sAlG . WRITTEN INTO RHCSI 
;RHCS1 WAS READ 

RH BRE 

; THEN ZERO WAS WRITTEN 
;INTO_RHBAE 

i READING RHBAE 


AE SHOULD HAVE 0 
;BUT CONTAINED WHAT IS 
:GIVEN IN BAD RHBAE 














;READ RHCS1 ai. COMPARISON 
; COMPARE EXP 
DATA WITH BATA READ FROM 








;AFTER SETTING fh BIT #5 
s IN RHCS2 ult INIT RH 
3Al6 WAS yh INTO RHCS1 
sRHCS1 WAS READ 
RHBAE_WAS READ 

;THEN ZERO WAS WRITTEN 

; INTO_RHBAE 

; RHBAE WAS a 

;ON READING RHCS1 
sRHCS1 SHOULD HAVE DVA!RDY 


BUT CONTAINED WHAT IS 
;GIVEN IN BAD RHCS1 
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DERHAB . SRC Te4 TEST DUPLICATED Al7 (RHCS1 BIT #9) 


ca 8 CLEAR THE SUBSYSTEM BY A CONTROLLER CLEAR (RHCS2 BIT #5) 

puee - ;% Res 3 ee Of6 CONTAIN 12Q0 rca He aN RDY) 

7467 : BAE TO CONTAIN “2” (BIT #1 HIGH) 

oueS i: 

s 

7470 :# MOVE 0 INTO RHBAE (WRITING O INTO RHBAE BIT #1) 

7471 1k READ RHBAE TO CONTAIN 2 

oe i READ RHCS1 TO CONTAIN ONLY RDY (BIT #9 IN RHCS1 IS ZERO) 

7474 © #. 

7475 | KASS KHELE AHS RLKA LARS EAE RAR EASES ALA LA LALA EA KEASHA ALARA LL KZRZKEE 

7476 022556 OOCOD4 +éT24: SCOPE 

7477 O22560 012706 001000 MOV #STACK, SP ;RESET STACK 

na: 022564 012737 000024 OO4ESE MOV #24, J8TSTNM :SAVE TEST NUMBER 

7480 O22572 O04737 oO40312 ISR PC, J#CLDISK ;GIVE RH INITIALIZE 

7481 :SETUP UNIT NUBER 

mee :CLEAR RHIC AND FUNCTION BITS IN RHCS1 

7484 sWRITE "1" INTO A17 IN RHCS1 

ees 022576 012777 OO1000 161254 Mov #17, JRHCS1 ;MOVE 1200-INTO RHCS1 

7487 

7488 

7489 _ CHECK THAT RHCS1 HAS A17!DVA!RDY 

e430 022604 012737 oOS200 001124 Mov #A17!DVA!RDY, SGDDAT :GET GOOD = 4600 

7492 O22612 917737 161242 001126 MOV ORHCS1,SBDDAT  ;READ RHCS1 ofr COMPARISON 

7493 O22620 023737 O0112e4 O01ie6 . CMP $GDDAT;SBDDAT  ;COMPARE EXPECTE 

oad “ sara WITH DATA READ FROM 
7496 022626 001401 BEQ 65S :BRANCH IF GOOD 

7497 22630 104060 ERROR 60 

7498 sAFTER SETTING "cur" BIT #5 

7499 "IN RHCS2 TO INIT THE RH 

7500 . :Al7 HAS WRITTEN INTO RHCS1 

7501 : sRHCS! 

7508 RHCSI SHOULD HAVE AL7!DVA!RDY 

7504 is CONTAINED WHAT IS 

7505 . GIVEN IN BAD RHCS1 

7506 022632 65S: | 

7507 

7508 

7509 :CHECK THAT RHBAE HAS BIT! 

7510 022632 012737 oO0002 001124 Mov #BIT1,$GDDAT  ;GET GOOD =2 

7512 O22640 017737 161264 OD1125 - MOV JRHBAE,SBDDAT  ;READ RHBAE FOR COMPARISON 
7513 O22c646 023737 061124 001126 CMP SGDDAT;SBDDAT  :COMPARE EXPECT 

7514 :DATA WITH DATA READ FROM 

7515 : RHBAE 

7516 O22654 00140! BEQ 675 “BRANCH IF GOOD 

7517 Oe2656 10406! ERROR 61 fi. 

7518 ;AFTER SETTING "CLR" BIT #5 


7519 IN RHCS2 TO INIT THE RH 
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Tey TEST DUPLICATED Al7 (RHCS! BIT #9) 

7520 sA17 WAS WRITTEN INTO RHCSI 
N_RH 
738 | He, AE Br 
7525 SUT CONTAINED WHAT IS 
roe ;GIVEN IN BAD RHBAE 
foe? 022660 67S: 
W MOVE 0 INTO RHBAE (WRITING 0 INTO RHBAE BIT #0) 

P38 022660 005077 161244 ARH MOVE ABAE SARITE ZERO. INTO. RHBAE 
7532 
7533 , ;CHECK THAT RHBAE HAS O 
7534 22664 012737 000000 o01124 HOV #0, SGDDAT ;GET GOOD = 0 
7536 022672 017737 161232 001126 MOY  @RHBAE, SB0DAT —; READ _RHBAE FOR COMPARISON 
7537 Oee700 023737 001124 O01126 CMP §GDDAT}SBDDAT  ;COMPARE EXPECT 
7538 . sDATR WITH DATA READ FROM 
7540 022706 001401 BEQ = 98 ;BRANCH IF GOOD 
7541 O2271G 104062 ERROR 62 
7542 ;QFTER SETTING "CLA" B17 #5 
7543 ;IN SPHcSé TO INIT THE RH 
7544 3017 HAS WRITTEN INTO RHCSI 
7545 _— FRAGST has READ 
7546 sRHECE AS READ 
7547 . } THEN ZERO WAS WRITTEN 
7548 ' ;INTO_RHBAE 
7549 _ }0N_READING RHBAE 
7550 SRHBAE SHOULD HAVE 0 
7551 ;BUT CONTAINED WHAT IS 
7552 :GIVEN IN BAD RHBAE 
7553 022712 69S: 
7554 
7555 
7556 ;CHECK THAT RHCS1 HAS DVA!RDY 
yee? 022712 012737 04200 001124 HOV #DVAIRDY,SGDDAT ;GET GOOD = 4200 
7559 022720 017737 161134 001126 MOV RHCS1,$SDDAT ;READ RHCS1 FOR COMPARISON 
7560 O22726 023737 OO1124 OOli26 CMP  S$GDDAT;SBDDAT © ;COMPARE EXPECTED 
7561 :DATA WITH DATA READ FROM 
7562 ;RHCS1 
7563 022734 OO14O1 BEQ 718 SBRANCH IF GOOD 
7564 022736 104063 | ERROR 63 
7565 | sAETER SETTING "CLR" BIT 4S 
7566 SIN RHCS2 TO_INIT THE RH 
7567 SAL? WAS WRITTEN INTO RHCS1 
7568 SRHCS1 WAS READ 
7569 ; RHBRE_W AS READ 
757 THEN ZERO WAS WRITTEN 
7571 INTO. RHBAE 
7572 ;RHBRE WAS READ 
7573 :0N READING RHCS1 
7574 HCS1 SHOULD HAVE DVA!RDY 


7575 : eco 









ne a ee ee a ne ee te + 


ululututututute 
ee UD 


3-3 
rire 


a 9 a ST 


witee 


lututute 
= C1.00 IO UNL Gs 


uw 


ari ot vd thd 


O00 


tattatitatatatatat 
fe 
a 


atatatate 
POREBS 


023014 


023014 





000004 
012706 
Qle737 


004737 


012777 


012737 


001401 
154064 


012737 


000025 
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;BUT_ CONTAINED WHAT IS 
;GIVEN IN BAD RHCS1 







p PRA RRRERREER EERE EERE RRRREEEEERESORESEES EEEEEEE CHEESES EEE Es 444524 
;#TEST 25 TEST DUPLICATED IE (RHCS1 BIT #5) 


ROVE tt fy * CONTROLLER CLEAR (RHOS2 BIT #5) 
READ RHCS1 TO CONTAIN 309 att #6 AND RDY) 
READ RHCS3 TO CONTAIN “100” (SIT #& HIGH) 





ee ee ee esas 
, 





MOVE INTO ire Mott O INTO RHCS3 BIT #6) 
READ RHCS3S 70 CONTAIN 10 


READ RHCSi TO CONTAIN ONLY RDY (BIT #6 IN RHCSL IS ZERO) 


Oe ee eee Oe 





F455 dalalal-+-5-$-+-telalelalalalalahalaialialalaiaiaiabaiaalaialainialchaisieisisbehslsisiaisinisisislsinisiieinialaiaiel 


+4735: SCOPE 
MOV #STACK, SP sRESET STA 
MOV 825, a8TSTNM : SAVE Test” NUMBER 


JSR PC, d@CLOISK :GIVE RH INITIALIZE 
;SETUP UNIT NUBER 
;CLEAR RHWC AND FUNCTION 


sWRITE "1" INTO IE IN RHCS1 
161072 hoy SIE, ORHCS! ;MOVE 100 INTO RHCS! 


we ee eres oe et ae 


801090 
OO4ESE 


040312 





SITS IN RHCS1 





000100 















. ine THOT Bue bh gE ARVAERDY 


















004300 90112 GOA ;GET GOOD = 4300 
161060 001126 MOV JRHCS1,SBDDAT READ RHCS1 aa COMPARISON 
607124 601126 CMP $GDDAT: SBDDAT ; COMPARE EXP 
Ship UiTH DATA READ FROM 
BEG S$ :BRANCH IF GOOD 
ERROR 64 
AFTER grt TTING gtk BIT 85 
N RHC 
WAS “ieltTeN INTDe RAeS! 
‘akc REA 
sRHCSL SHOUT HAVE IE!DVAIRDY 
‘BUT CONTAINED WHAT IS 
:GIVEN IN SAD RHCS1 
6s$: =~ 
;CHECK THAT RHCS3 HAS IE 
000100 901124 Mov SIE, $GDDAT :GET SOCD = 




























ACYL] E7(73 
ES SUPLIS oA 
7532 O23022 O1773? 161104 daodli 
cpa 522030 023737 801124 9011 
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DERHAB. SRC Tes 











6 1 
1 BI 
MUV DRHCS3,S$BDDAT  ;READ RHCS3 FOR COMPARISON 
CMP $GODAT , $8DDAT Sera thw Bete Reap FROM 


mm fy 





f a HCS3 

7635 023036 90149) . fe $7$ + BRORCH IF GOOD 

73> 23080 104085 ERROR 65 

7$33 ; ;AFTER SETTING “CLR” BIT aS 
7838 . tIN RHCSe 10 INIT THE fH 
7640 !TE WAS WRITTEN INTO RHCS! 
7541 : ;RHCS1 WAS _READ 

7e4E [THEN RHCS3 WAS READ 

a ;RHCS3 SHOULD HAVE IE 

745 ie aur CONTAINED WHAT IS 


7e4e | :GIVEN IN BAD RHCS3 


TS43 iNOW seats INTO RHCS3 (WRITING 0 INTO RHCS3 BIT sl 
7650 Oe3042 005077 161064 eR HCS3 ;WRITE ZERO INTO RHCS3 

























7687 ‘ :IE WAS WRITTEN INTO RHCS! 


é 
7653 ;CHECK THAT RHCS3 HAS 0 
i 02304 012737 000000 001124 Mov 80, SGDDAT ;GET GOOD = 0 
7655 023054 017737 161052 901126 ~ MOV MJRHCS3,.SBDDAT ;READ RHCS3 FOR COMPARISON 
7657 O230b2 Oe3737 O0ll2e4 O01l26 a FP $GDDAT, $8DDAT ; COMPARE EXPECTED 
7658 :DA TA WITH DATA READ FROM 
‘Ss 
7660 023070 00140: BEG = SBRANCH IF GOOD 
766i OCes07e 104066 ERROR 66 
7652 z ;AFTER SETTING Ft ort as 
7EE3 SIN RHCS2 10 INIT T 
7564 STE WAS HRITTEN INTO RECS! 
} 7eés :RHCS1 WAS READ 
7655 sRHCSS WAS READ 
7687 N ZERO WAS WRITTEN 
7668 INTO RHCS3 
| 7eE8 :0N RE 
7870 ;RHCS3 SHOULD HAVE 0 
7671 ISUT CONTAINED WHAT IS 
7672 ;GIVEN 2.1 BAD RHCS3 
7673 023074 69S: 
7E74 , me 
7675 
| 7676 ;CHECK THAT RHCS! HAS DVA!IRDY 
| i 34h 023074 -012737 O04200 001124 -. + MOV sDVA!ROY,SGODAT ;GET GOOD = 4200 
| A BUM Qe AER GRE || RRGH:ARO | sp.nrai ce gormmso 
' f ow = 
| oeEs me Afri bs BTA READ FROM 
| 7583 023116 00140) BEG 71$ - BRANCH IF GOOD 
| 768% Oe3sieO 104067 P ERROR 67 
| 7685 sAFT c SETTING 1h ort 85 
| 7586 : :IN RHCS2 TO INIT THE R 
| 
i 


On ane saree —_——— - ee See 





7688 023122 
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Tes 


O0CS04. 
012706 


012737 
004737 


012777 
012777 


012737 
004077 


012737 


017737 
023737 


- MACYLL 2a? ( 
TEST OUPLI 


001000 
000026 


040312 


177786 


ao4eie 
177777 
161450 


000901 
000001 


144061 


160649 
001124 


32 
* 


on 


OO4ESE 


160712 
160706 


004644 


160560 
160652 


001124 


001126 
001126 





TED 
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TE (RHCS] BIT #6) 


718: 


5 RRRRRARARERRREAERE EARS ER ERE LEER AA RRERERAER ER ELE DEERE EERE ES EEE 
;*TEST 26 RHCS1 PROGRAM ERROR (PGE BIT #10) 


on Se ec et ee ee et os ee et ee es ee 


© EE i oie RE i ee ie he he ie 


jiteseeepeeaetenecaenenasassesasnecaenecensesnnaesncsenenseseces 
6: 













;RHCS1 WAS READ 
SRHC53_WAS READ 
; WGN GERO WAS WRITTEN 







CS3_ WAS READ 
‘Ry READING RHCS1 
RHCS1 SHOULD HAVE DVA!RDY 


=4e 
BUT ONTAINED WHAT IS 
;GIVEN IN BAD RHCS1 








CLEAR. ye. yg BY A CONTROLLER CLEAR (RHCS2 BIT #5) 
SET UP FOR A 10 WORD WRITE 
Pas at, CRHCSI BIT #0) TWICE IN TWO SUCCESSIVE 

STR 


UCTIONS 
THIS SHOULD Set $C BND TRE IN PHCS1 
Q DBE. SET IN RHCS2 


Sate 
THE 5 ot SF uo Kibs ARE LARGE ENOUGH 0. THAT AFTER 
ONE "BIS" INSTRUCTION TO SET "GO" IN ‘ 
THERE IS SUFFICIENT TIME TO GIVE ANOT NER *BIS INSTRUCTION 
TO SET “GO BEFORE THE FIRST “GO" HAS TIME TO COMPLETE 





E 
MOV aSTACK, SP sRESET STACK 
MOV #26, aaTSTNM :SAVE TEST NUMBER 


JSR PC, asCLOISK ;GIVE Fx HEN TAL LZE 
SETUP UNIT NUBER 
;CLEAR RHWC AND FUNCTION BITS IN RHCS1 


;SET UP RH FOR A 10 WORD WRITE 










hoy #-10. , IRHWC WOR f COUNT REGISTER=10 
MOV SURFROM, SRHGA S ADDRESS REGISTER=HRITBUF 
;WRITE 10 WORDS’ FROM “WR ait TO 






Mm” IN 
jana ai a RH EEVICe IS nase 









OV NOT GIVE 188, IN COMMAND ROUTINE 
13k RO, 1 ROHND :GO TO DO COMM 
WRIDAT WRITE -DATA 
BIS #60, IRHCS1 SET GO 
BIs 8G0; aRHCS] :SET GO WITHOUT TIME TO COMPLET LAST SO 







. CHECK THAT RHCS1 HAS SC!DVA!TRE!61 
Mov #SC'DVAITRE'61,$GDDAT ;GET GOOD = 144000 
MOV QRHCS1,$8DDAT  ;READ RHCS1 FOR COMPARISON 
CMP $GDDAT;SBDDAT COMPARE EX 


PECTED 
:DATR WITH DATA READ FROM 









g Sessa2 
a ue 
a52 
7 BEE 
Soph 
ak 
7764 023264 
P7ES QS3266 
o7EE 


7794 023316 
77 
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sa 11-DERHAS-A 
DE RHCS1 PROGRAM ERROR (PGE BIT #10) 


;BRANCH IF GOOD 


Wee CK ys! RHCS2 HAS PGE!OR 


ae Bbes1d | Solis4 INET ScOBeT  PNCLSBE UNTF NUMBER 


160614 001126 
001124 001126 


;CHECK THAT RHCS3 HAS DBL 
C02000 001124 OV BL, 


160630 (CQ0l1le6 
00i124% O01126 


C 
BRANCH IF GOOD 


:"GO" WITHOUT GIVING TIME FOR 
iT R COMPLETE 


2 aang ge a corn ae ane eats 
RHCS2 - BUS ADDRESS INHIBIT BIT #3 












; AFTER ag'tiN mo BIT #5 

:IN asin NIT 

:AND. BTVING. TWO succe se] VE 
WITHOUT GIVING TIME FOR 

THe FIRST TO COMPLET = 

;RHCS eee HAVE SC!DVA!TRE!61 


=144 
‘BUT CONTAINED WHAT IS 
GIVEN IN BAD RHCS1 





















;RE EAD nae FOR COMPARISON 
; COMPAR xPET ED 

DATA. in 1 DATA READ FROM 
BRANCH IF GOOD 


s AFTER SETTING “CLR” BIT #5 
TO_INIT THE RH 










sT I 0 OMPL 
us SHOULD HAVE PGE!OR 
GETHER WITH rh + from 


310 
BUT CONTAINED W 
GIVEN IN BAD Rucs2 



























;GET GOOD = 0 


; READ page em COMPARISON 
:COMPARE EXP 
;DATA WITH BATA READ FROM 


iON RCSD TO. GN amy BIT #5 
AND GIVING TWO auCCESETVE 


SHOULD HAVE 
‘BUT CONTAINED WHAT IS 
;GIVEN IN BAD RHCS3 






Fle 
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7800 i CLEAR THE SUBSYSTEM BY A re’Eaan A BUFFER Tauck = Bl te 
é ; 

? 33 1% eH Bis, Seapine Babee" BIT ore BAI” 

re ;* 

7804 i RHCS1 TO HAVE ONLY COMMAND 

7805 i? RH RHCSe 10 TO HAVE BAI 

ty Re TO HAVE ADDRESS OF “WRFROM" 

80 i HBAE AND RHWC TO HAVE ZEROS - 

7810 ie NOW SET UP READ FOR THE SAME DATA WITH 

et i BAL Set 10 TO READ INTO A BUFFER TAGGED “REINTO” 

7813 te RHCS1 TO er ONLY RDY AND COMMAND 

7814 # HCS2 TO HA I 

7815 1% RHCS3 TO HAV 

7816 1% A TO HA VE ADDRESS OF “REINTO” 

7817 : # RHBAE AND RHWC TO HAVE ZEROS 

7818 i DATA IN grEINTO BUFFER IS CHECKED WITH DATA IN 

(Sa ;* 

7820 s ee gee em een ne ee 
7821 023316 900004 +8737: SCOPE 

7822 022320 O1e7D& 001000 ay #STACK, SP sRESET STACK 

823 023324 012737 000027 on4ese MOV #27, a8 TSTNM :SAVE TEST NUMBER 

7825 023332 004737 040212 ‘JSR PC, #CLDISK ;GIVE RH INITIALIZE 

7826 ‘SETUP UNIT NUSER 

7827 aay. :CLEAR RHWC AND FUNCTION BITS IN RHCS1 









7828 

7829 ;SET UP 10 oye WRITE FROM BUFFER TAGGED “WRFROM” 
7830 :WITH BAI IN RHCS2 

7831 023336 012777 177766 160516 Mov #-10 ;WORD COUNT REGISTER=10 

7832 023344 952777 000010 160516 BIS SBA, RHCS2 ;BUS ADDRESS INHIBIT IN RHCS2 
7833 Oe33S2 012777 OO4210 16050 MOV WRFROM, JRHBA =; BUS ADDRESS REGISTER=WRFROM 
7834 023360 O04077 161254 JSR RO, aCOMND GO TO 00 COMMAND 

7835 023364 004154 WRIDAT ;WRITE DATA 













7838 ;CHECK THAT RHCS1 HAS DVAIRDY! 60 

a 023366 012737 OO04260 001124 Mov #DVA!RDY!60, $GDDAT ;GET GOOD = 42Se 
7841 023374 017737 160460 001126 MOV MRHCS:,$8DDAT  ;READ wigs B oer COMPARISON 
7842 023402 023737 001124 001126 CMP _ $GDDAT, $BDDAT s COMPARE EXE 

at, ‘ PAC te TH BAYA READ FROM 
7845 023410 001401 BEQ 65$ . BRANCH IF GOOD 

7846 O23412 104076 ERROR 76 

7847 - 3AFTER S TIN nF a #5 
7848 ;IN_RHC Q INIT THE R 

7849 ;A_2 WOR 5 WRITE WAS DO NE 
7850 sWITH BAI BIT + RHCS2 SET 
7851 AT END OF WRITE 

7852 ;RHC (S21 SHOULD HAVE DVA!RDY!60 






7354 ee SBUT CONTRINED WHAT IS 
GIVEN IN BAD RHCS1 














coe 023414 


eee 
RRR 
7863 


7864 
7885 de3444 
023446 


4 1A 023456 
7879 023450 


7880 
788 3456 
78 3464 
7883 
7884 


7885 023472 
7886 023474 
7887 
7888 





7895 023476 
7897 023476 


7899 023504 
7900 Oe35le 








7903 023520 
7904 Oe3S2e 


MAINDEC-11-DERHAB-A 
DERHAB. SRC Te? 


MACYI1 27(732) 
RHCS2 - BU 


Based 0818 BBLLES 
bess? OGL1e4 ObLise 


90140: 
To40r> 


Q1le737 000000 001124 


(017737 180450 001126 


023737 OCOl1le4% O0lleb 


001401 
104100 


017737 160354 001126 
023737 O0ll2e4 OOl1e6 






&7$: 


693: 
012737 oO04210 001124 - 


: 


22-SEP-76. 15:11 PAGE 151. 
S ADDRESS INHIBIT BIT a3 
65S: 
sCHECK THAT RHCS2 HAS BAI!IR 


3 


MOV 
CMP 


BEQ 


ERROR 


Mov 
MOV 
CMP 


BEQ 
ERROR 


MOV 
CMP 


BEQ 
ERROR 


Unit: dobar 


JRHCS2, SBODAT 
SGDDAT, , SBDDAT 
7$ 
7 


;CHECK THAT oe HAS 0 
#0, SGDDAT 


JRHCS3, SBDDAT 
$GDDAT, SBDDAT 


69$ 
100 


:CHECK THAT RHBA HAS WRFROM 
Mov #WRFR 


M, SGDDAT 


JRHBA, SBDDAT 
$GDDAT, SBDDAT 
71$ 
101 


: BRANCH IF GOOD 


;GET GOOD = 0 


‘ BRANCH IF GOOD 


i RHBA SH SHOULD HAVE WRFROM 









LB tare 


RED PBR EepES som a 
‘DATA WITH BATA’ READ FROM 






;AFTER SETTING “CLR” BIT #5 
IN RHCS2 TO INIT THE RH 
3A_2 WORD WRITE WAS DONE 
sWETH BAL BL rt RHCSe SET 


sRHCSe SHOULD HAVE BAI!IR 
TOGETHER: WITH UNIT NUMBER 


a CONTAINED WHAT IS 
GIVEN IN BAD RHCS2 

















;READ RHCS3 FOR COMPARISON 
; COMPARE 

;DATA WITH DATA READ FROM 
BRANCH IF GOOD 


;AFTER SETTING Fh BIT #5 
IN _RHCSe TO INIT THE RH 
2 WORD WRITE WAS 


:A E DONE 

sMITH BAI BIT +" RHCS2 SET 
D OF WRIT M 

tRHCES bat ow Ma VE _0 

iB T CONTAINED WHAT IS 

VEN tN RHCS3 










ote 







;GET GOOD = 0 


;READ RHBA po COMPARISON 
;COMPARE EXPECTE 
;DATA WITH DATA READ FROM 










;AFTER SETTING “CLR” BIT #5 

sIN_RHCS2 TO INIT THE RH 

3A 2 WORD WRITE WAS DONE 

:WITH BAI ott iN RHCS2 SET 
ND OF WRITE 









;BUT CONTAINED WHAT IS 
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;GIVEN IN BAD RHBA 
718: 


000000 001124 ;GET GOOD = 0 
160372 O011e6 MOV DRHBAE,SBDDAT ;READ RHBAE FOR COMPARISON 
O0iie4 O011e6 CMP SGDDAT;SBDCAT  ;COMPARE EXPECTED 
;DATA WITH DATA READ FROM 
73$ BRANCH IF GOOD 


102 
Al + a5 TING “CLR” BIT #5 
;IN_RHCS2 TO INIT THE RH 
S DONE 


eee BAI iT a RHCSe SET 


Agv"™ "oy scbbat > ° 


; RHBAE SHOUL iD HAVE 0 
BUT CONTAINED WHAT IS 
;GIVEN IN BAD RHBAE 


738: 
sCHECK THAT RHWC HAS O 
012737 o00000 001124 Mov #0, SGDDAT ;GET GOOD = 0 


017737* 0275 001126 MOV JRHWC , SBDDAT ;READ RHWC FOR COMPARISON 
023737 O0112e4% O011e6 CMP SGDDAT,SBDDAT  ;COMPARE EXPECTED 
;DATA WITH DATA READ FROM 


Hi 
001401 BEQ 75$ BRANCH IF GOOD 
10 103 


4103 | ERROR 
AFTER SETTING “CLR” BIT #5 

IN RHCSe TO INIT THE Ri 

"A 2 WORD WRITE WAS DONE 

sWIT ay BIT IN RHCSe SET 

at E OF WRIT 


;RHUC SH SHOULD HAVE. O 
'BUT CONTAINED WHAT IS 
va 'GIVEN IN BAD RHWIC 


5 RRR EER REE EEE EERE EER REE ERLE REE EERE EERE EERE EERE REE EE 
RHSCe MDPE BIT #8 AND RHCS3 IPCKO BIT #0 

CLEAR THE SUBSYSTEM BY ° CONTROLLER CLEAR (RHCS2 BIT #5) 

3M A PCKO (RHCS3 BIT 

OVE ALL ZEROS INTO RHDE 
THIS SHOULD SET TRE SC IN RHCS1 
READ RHDB ONCE TH Wie SHOULD SET MOPE (RHCS2 BIT #8) 
ae #7) , Te (BIT #14), SC (BIT #15) 


Serererer ats 
m 


Se ee wees ee ee wes es ee we we 


CHECK RHCS1, RHCSS. RHCS3, RHBA, RHBAE, RHWC 


ye CO Ne OEE Eee oo RE | 


023600 900304 +4130: SCOPE 
7967 O23602 012726 001000 Rov STACK, SP SRESET STACK 
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023606 012737 000030 O0465S MoV #30, J8TSTNM ;SAVE TEST NUMBER 


023614 004737 O403le | | JSR PC, d#CLDISK i$ Yop RA ce aZe 


RHWC AND FUNCTION ‘ee IN RHCS! 
023620 012737 000000 Oo04b62 — MOV #0, IP STBCK BIT NO. FOR PRINTOUT 

OS2777 000001 160276 BIS #IPCKO, JRHCS3 ag aT EKO IN RHCS3-BIT_ #0 

005037 004210 CLR WRFROM’ ite ZERO INTO LOCATION 
013777 OO4210 160234 MOV WRFROM, JRHDB sURIT ZEROS INTO wis ONCE 


. CHECK THAT RHCS1 HAS SC! TRE!DVA!RDY 
012737 144200 001124 Mov #SC!TRE!OVAIRDY,SGDDAT ;GET GOOD = 144200 


be73? dGiies Ooiise cre SCGGRT/ SEDO iCnenke EhreTeD 
lL ia DATA READ FROM 
001401 BEQ 65S ‘BRANCH IF GOOD 


104140 ERROR 140 
“ 4 yt SETTING NIP THE Be #5 


; B 
ZEROS WERE MOVED INTO RHDB 
gRHCS OL HAVE SC!TRE!DVA!RDY 


=144 
BUT CONTAINED WHAT IS 
023674 ;GIVEN IN BAD RHCS1 


Qe3674 017737 160e0e 001200 ' MOV @RHDB, STMP1 ;READ RHDB ONCE 


SET 


. . 3CHECK THAT al HAS 1 
Og370e 012737 000001 O0112e4 . MOV #1, SGDDAT ;GET GOOD = 1 


023710 017737 160216 001126 MOV QRHCS3,SBDDAT ;READ RHCS3 FOR COMPARISON 
023716 023737 O011e4% COlleb CMP SGDDAT;S$BDDAT  ;COMPARE EXPECTE 
:DATA WITH DATA READ FROM 


:RHCS 
023724 901401 BEQ 67$ BRANCH IF GOOD 


023726 104104 ERROR 104 
' ;AFTER SETTING “CLR” BIT #5 


IN RHCS2 TO INIT THE RH 
;IPCKO BIT #0 RHCS3 WAS SET 
; ZEROS WERE MOVED INTO 


RHOB WAS READ THEN 
;RHCS3 SHOULD HAVE | 


BUT CONTAINED. WHAT IS 
;GIVEN IN BAD RHCS3 


023730 


;CHECK THAT RHCS2 HAS MOPE!IR 


023730 012737 000500 001124 ~ MOV #MDPE! IR, SGDDAT ;GET GOOD = S00 
023736 053737 -005010 O0i1e4 BIS UNIT, $GDDAT INCLUDE UNIT NUMBER 





MAINDEC-11-DERHAS-A 
DERHAB . SRC T30 


023744 
023752 


023760 
023762 


023770 
023776 
024004 


024012 
024014 


024016 


024016 
024024 


024032 


017737 
023737 


60140! 
104105 


004737 


012737 
017737 
023737 


001401 
104106 


012737 
053737 


017737 
023737 


MACY11 27(732) 
RHSC2 MDPE SIT #8 AND RHCS3 IPCKO BIT #0 


160120 
001124 


040312 


004200 


160056 
001124 


000100 
005010 


160032 
001124 


001126 
001126 


001124 


CO1126 
001126 


001124 
001124 


001126 
001126 


22-SEP-76 15:11 PAGE 154 


Mov SADDaT’ ,SBDDAT  ;READ RHCS2 FOR COMPARISON 
at pmates tare Sie ath BAYA READ FROM 


69$ ‘BRANCH IF GOOD 


BEQ 
ERROR 105 
;AFTER SETTING “CLR” BIT #5 
iT PACRE TO_INIT THE RH 
PCKO BIT #0 RHCS3 WAS SET 
; ZEROS WERE MOVED INTO 


 RHDB WAS READ THEN 
sRUGRe SHOULD HAVE MOPE!IR 


; TOGETHER WITH re NUMBER 
:BUT CONTAINED WHAT IS 
: GIVEN IN BAD RuCSE 


JSR PC, J#CLDISK ;GIVE RH INITIALIZE 
:SETUP UNIT NUBER 
;CLEAR RHWC AND FUNCTION BITS IN RHCS1 


:CHECK THAT RHCS1 HAS RDY!DVA 
MOV #RDY!DVA,SGDDAT ;GET GOOD = 4200 
MOV QRHCS1,S$BDDAT  ;READ RHCS1 FOR COMPARISON 
CMP $GDDAT.$8DDAT  :COMPARE EXPECTED 
pre Mere DATA READ FROM 
71$ :BRANCH IF GOOD 


BEG 
ERROR 106 
s AFTER SETTING “CLR” BIT #5 


ZEROS WERE MOVED INTO 
;RHOB 


;RHOB WAS READ THEN 
AR (RHCS2 BIT #5) 
SHOULD 


LL 
:RACS| SHOULD HAVE RDY!DVA 


=4200 
‘BUT CONTAINED WHAT IS 
;GIVEN IN BAD RHCS1 


“CHECK THAT RHCS2 HAS IR 
Mov #IR, $GDDAT :GET GOOD = 100 
BIS uNIt, $GDDAT ‘INCLUDE UNIT NUMBER 


MOV @RHCS2,S$BDDAT ;READ RHCSe dt COMPARISON 
CMP $GDDAT,$BDDAT  ;COMPARE EXPECTE 
DATA WITH DATA READ FROM 
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;RHCS2 
peas 00149 BEQ 73$ ;BRANCH IF GOOD 
” 10410 ERROR 107 
sAFTER SETTING “CLR” BIT #& 


HC IT THE 
PCKO BIT #0 RHCS3 WAS SET 
; WERE MOVED INTO 

HDB WAS READ THEN 
;AN_RH CLEAR (RHCS2 BIT #5) 
WAS GIVEN THIS SHOULD 
ict EAR ALL ERRORS 

RHCSe SHOULD HAVE IR 


THER WITH UNIT NUMBER 
a CONTAINED WHAT IS 
GIVEN IN BAD RHCS2 


733: 
*CHECK THAT RHCS? HAS 0 
012737 oco000 001124 ; Mov #0, $GDDAT ;GET GOOD = 0 


017737 160046 001126 - MOV @RHCS3,$BDDAT  ;READ ge = oo COMPARISON 
023737 O01124% OOll2e6 CMP $GDDAT, — :COMPARE EXP 
;DATA WITH BATA READ FROM 


: . ?RH 
001401 BEQ = 75S BRANCH IF GOOD 


104120 110 Fgh 
sAFTER SETTING “CLR” BIT #5 
ZIN RHCS2 TO INIT THE RH 
;IPCKO BIT #0 RHCS3 WAS SET 
fy WERE MOVED INTO 


=] 


GIVEN IN BAD RHCS3 


024100 733: _ 
;CHECK THAT RHBA HAS 0 
024100 012737 oO00000 O0lle4 MOV —s-#0, SGDDAT ;GET GOOD = 0 


024106 017737 157752 001126 MOV ARHBA, SBDDAT ;READ RHBA FOR COMPARISON 
024114 0623737 O011e4 001126 CMP $cDDAT, SBDDAT ;COMPARE EXPECTED 

. ;DATA WITH DATA READ FROM 
024122 | 77$ BRANCH IF GOOD 


024124 : 111 
HIN an SETTING "CLR" BIT #5 


TREO OL VNU EO De sor eae 


ul 


ZEROS WERE MOVED INTC 
: RHDB 


sRHDB WAS READ THEN 
sAN RH CLEAR (RHCS2 BIT #5) 


81 
81 
81 
81 
81 
81 
Bt 
1 
81 
81 
81 
81 
81 
81 
8i 
81 
81 
81 
81 
81 
81 
81 
81 
~ Bh 
. Bl 
81 
81 
= 
81 
81 
81 
81 
81 
81 
81 





i 
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8136 ;WAS GIVEN THIS SHOULD 
8137 CLEAR ALL ERRORS 
8138 *RHBA SHOULD HAVE 0 
i tien eo ee 
gti 024126 77S: 
8142 :CHECK THAT RHBAE HAS 9 
B43 024126 012737 o00000 o01124 Mov #0, $GDDA ;GET GOOD = 0 
8145 024134 017737 157770 001126 MOV JRHBAE,SBDDAT  ;READ RHBAE FOR COMPARISON 
8148 Oe4142 023737 001124 001126 CMP $GDDAT,$BDDAT  :COMPARE EXP 
B14? ;DATA WITH BATA READ FROM 
8149 O24150 O01401 BEQ 795 BRANCH IF GOOD 
150 O24152 104112 . ERROR lle. 
151 yay SETTING “CLR” BIT #5 
1 HCS2 TO INIT THE RH 
g153 + PCKO BIT #0 RHCS3 WAS SET 
gic) ; ZEROS WERE MOVED INTO 
8156 ‘RHE WAS R AD THEN 
8157 CLEAR (RHCS2 BIT #5) 
8158 WAS GIVEN THIS SHOULD 
gis9 :CLEAR ALL ERR 
8160 :RHBAE SHOULD HA AVE 0 
8161 *BUT CONTAINED WHAT IS 
8162 :GIVEN IN BAD RHBAE 
8153 o24154 793: 
Bibs *CHECK THAT RHWC HAS 0 
Bibs 024154 012737 o00000 001124 MOV #0, SGDDAT ;GET GOOD = 0 
8167 O24162 017737 157674 001126 MOV JRHWC,SBDDAT.  ;READ RHWC FOR COMPARISON 
8168 024170 623737 O01124 O01126 CMP $GDDAT,$BDDAT  :COMPARE EXPECTED 
8169 DATA WITH DATA READ FROM 
8170 * RHIC 
8171 024176 001401 BEQ 81$ ‘BRANCH IF GOOD 
8172 O24200 104113 ERROR 113 
2173 . ;AFTER SETTING “CLR” BIT #5 
8174 :IN RHCS2 TO INIT THE R 
8175 :IPCKO BIT #0 RHCS3 WAS SET 
8176 :2EROS WERE MOVED INTO 
8177 : RHDB 
8178 *RHDB WAS READ THEN 
8179 *AN RH CLEAR (RHCS2 BIT #5) 
8180 *WAS GIVEN THIS SHOULD 
8181 ;CLEAR ALL ERRORS 
8182 *RHWC SHOULD HAVE 0 
Sine Sele. <a eae gen Ane ‘BUT CONTAINED WHAT IS 
8184 GIVEN IN BAD RHWC 
8185 ocexe02 BIS: 
8186 
61a 
Bigg | ivesT a1 RHSCD MOPE BIT aa AO Rice? IPCKI Biter 
8190 : TE RHSC2 MDPE BIT #8 AND RHCS3 IPCK! BIT 41 
2191 * 3h car THE SUBSYSTEM BY A CONTROLLER aLEAR (RHCS2 BIT #5) 


Mie 
BEARS SRE NRPS «= ORSco Bee BIT aS AND Ruts TPem Big eale 
SET IPCKL (RHCS3 BIT #1) 
INTO RHOB one 


THs oH B Rates Ife Sole ta nit 
CHECK SR ROY (BIT #7) de TRE (BIT #14), SC (BiT #15) 


"CLR" fRres2 i #5) IS GIVE 
ALL ERRORS ARE CLEARED 
CHECK RHCS1, RHCS2, RHCS3, RHBA, RHBAE, RHWC 


i Bete Gas one cage eee rah eranaaneeas 
seat 0010900 MOV. #STACK, SP ;RESET STACK 
12737 000031 #31, a8TSTNM :SAVE TEST NUMBER 


004737 040312 PC, d#CLDISK iS Top RH He 2E 


CL LEAR_RHWC AND FUNCTION BITS IN RHCS1 
012737 000001 Od046&2 #1, IP ;IPCK BIT NO. FOR PRINTOUT 


052777 o0000e2 157674 sIPCK1, JRHCS3 ime IPCK1 IN RHCS3-BIT #1 
005037 904210 WRF ROM WRITE ZERO INTO LOCATION 
013777 OO04e10 157632 URFROM, ARHOB ;WRITE ZEROS INTO RHDB ONCE 


ee ee ee ee wees et ae 
MK KK oie ie ie ie ote 


itch rt rt rte ett et etethad 
GRRLZERHSSSSIF RLS 


;CHECK THAT RHCS1 HAS SC!TRE!DVA!RDY 
012737 144200 001124 MOV #SC!ITRE!DVA!RDY,SGDDAT ;GET GOOD = 144200 


017737 157576 001126 MOV @RHCS1,SBDDAT  ;READ RHCS1 FOR COMPARISON 
023737 O0112e4% 001126 CMP $GDDAT;$BDDAT  ;COMPARE EXPECTED 
;DATA WITH DATA READ FROM 


CS1 
4272 001401 BEQ 65$ ? BRANCH IF GOOD 
024274 104140 ERROR 140 
‘ ;AFTER SETTING rt a #5 


82 
82 
82 
82 
82 
82 
82 
- Be 
Be 
82 
82 
Be 
82 
82 


A eae tm 
WONTUCWM-OwWw 


; IPCK RHCS3 WAS SET 
‘Frey WERE MOVED INTO RHDB 
mies SHOULD HAVE SC! TRE!DVA!RDY 


=144, 
BUT CONTAINED WHAT IS 
:GIVEN IN BAD RHCS1 
024276 


O24e76 017737 157600 001200 : MOV QRHDB , STMP 1 ;READ RHDB ONCE 


;CHECK THAT RHCS3 HAS 2 
024304 012737 O00002 001124 hoVv #2, SGDDAT ;GET GOOD = 2 


O24312 017737 157614 O01i26 MOV @RHCS3,S$BDDAT  ;READ sige FOR COMPARISON 
024320 0237327 O0112e4 O011le6 CMP SGDDAT,;$BDDAT  ;COMPARE EXPECTED 
;DAT A WITH DATA READ FROM 


H 
024326 001401 BEQ 675 t BRANCH IF GOOD 
024330 104104 ERROR 104 
yet SETTING writ a M #5 


SIN RHCSe TO INIT T 
i TPCKI BIT #1 RHCS3 WAS SET 
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024366 


024366 


024372 
024400 
024406 


024414 
24416 


012737 
953737 


017737 
023737 


001401 


104105 


004737 


012737 
017737 
023737 


001401 
104106 


RHSC 


ooosc9 
005010 


157516 
00i12e4 


040312 


004200 


157454 
001124 


MACY11 E7 
MOPE 


001124 
001124 


001126 
001126 


001124 


001126 
001126 


67$: 


69$: 












ZEROS WERE MOVED INTO 


REL EP E's 


‘ut CONTAINED WHAT IS 
GIVEN IN RS we RHCS3 





:CHECK THAT RHCS2 HAS MDPE!IR 
MOV aNDPE? IR $GDDAT ;GET GOOD = S00 
BIS UNIT, SGDDAT INCLUDE UNIT NUMBER 


MOV aracse, $BDDAT  ;READ nie 4d a 
CMP $GDDAT, SBDDAT i COMPARE EXE SCTED 
RHCae TH DATA READ FROM 


BEQ 693 ;BRANCH IF GOOD 
ERROR 105 
HIN Re 51 1? a Mi #5 


i ZEROS WERE MOVED INTO 
;RHDS 


*RHDB WAS READ THEN 
sRUCSe WeROLED HAVE MDPE!IR 


STOGETHER WITH He NUMBER 
BUT CONTAINED WHAT IS 
:GIVEN IN BAD CSE 


JSR PC,ad#CLDISK | astra RH RM 
: CLEAR RHC AND FUNCTION BITS IN RHCS1 


;CHECK THAT RHCS1 HAS RDY!DVA 
MOV #RDY!DVA,SGDDAT ;GET GOOD = 4200 


MOV @RHCS1,S$BDDAT  ;READ RHCS1 Pete COMPARISON 
CMP $GDDAT; SBDDAT ; COMPARE EXPECT 
DATA WITH DATA READ FROM 


SRHCS1 
71$ ) BRANCH IF GOOD 


BEQ 

ERROR 106 
; AFTER a5 'TING "CLR" BIT #5 
IN RHCS2 TO INIT THE RH 
:IPCK1 BIT #1 RHCS3 WAS SET 
; ZEROS WERE MOVED INTO 


HD WAS READ THEN 

N RH CLEAR (RHCS2 BIT #5) 
; HAS GIVEN THIS SHOULD 
:CLEAR ALL ERRORS 


-*-+-+-+-—=— ——--—- ———_—-_ 








“g B13 






















024519 017737 157380 O0ile6 MOV ORHEA, SSODRT 


RiNOEC= 1i ~DERHAS-A MACY]1 271732) 22-SEP-76 15:11 PAGE 159 
seas RESO T32 RHSC2 MOPE BIT #8 AND RHCS3 IPCK! BIT #1 
S304 sRHCS1 SHOULD HAVE RDY!DVA 
8305 24 
S338 BUT CONTAINED WHET IS 
ay fe 'GIVEN IN BAD RHCSI 
8308 24420 71S: 
8303 irterK THOT RHCS2 iS IR 
S310 pe4z0 912737 990100 go1184 AIR, $6 GET 000 = 160 
noe De44e28 053° 005019 O001124 avs UNIT, $GDDAT i PRCLEDE. UNI NUMBER ; 
8313 Oe4434 Oir73? 157430 001126 MOV JRHCS2, S80DAT  ;READ RHCS2 FOR COMPARISON PY 
83i4 Oev44e Os37s7? OUlleY OOlleb CMP SGDDAT;SSDDAT  :COMPARE EXPES - 
Patt fat: WITH DATA READ FROM 
B31? 24450 001401 REQ s 738 TBRANCH IF GOOD 
8318 24452 104107 ERROR 107 
8215 ;AFTER ye NG “CLR” BIT 35 
8320 s;IN RHCS2 TO INIT THE RH 
5321 SIPCK1 BIT #1 RHCS3 WAS SET 
BSes ; ZEROS WERE *HOVED INTO 
8324 aL WAS READ THEN 
8355 N-RH CLEAP (RHCSe BIT #5) 
S326 ‘HAs GIVEN THIS SHOULD 
S22 é LEAR ALL 
Ese RAC Se SHOULD HAVE IR 
8330 TOGETHER WITH eat NUMBER 
8321 :BUT CONTAINED W Is 
8322 :GIVEN IN BAD ahicse 
g333 O244s4 738: ; 
8334 s CHECK THAT ait AS 0 
Hea 024454 012737 000000 001124 MoV 80, $GODAT ;GET GOOD = 0 
8337 CE4462 217737 1S7444 001126 MOV SRHCS3,$BDDAT ;READ RHCS3 FOR COMPARISON 
8333 Gess70 023737 O01124 o0lie2s CMP $GDDRT, $80DRT : COMPAR E EXPECTED 
Hey Bates WITH DATA READ FROM - 
B34] O2e4476 00140) BEG 75$ : BRANCH IF GOOD 
B34e Oe4S500 104110 ERROR 110 
5343 ;AFTER SETTING rf SIT #5 
es44 . SIN RACS2 TO INIT THE RH 
8345 ‘ ;IPCK1 BIT 81 Ruies3 WAS SET 
j as sgERGS WERE MOVED INTO 
8348 ; : : : RHO WAS READ THEN 
8245 N RH CLEAR (RHCS2 BIT #5) 
8350 ifias Gry VEN THIS. SHOULD 
351 :CLEAR ALL. ERRORS 
B3Se : RHC $3 SHOULD HA VE 0 
8353 BU T CONTAINED WHAT IS 
| 8354 ;GIVEN IN BAD RHCS3 
| BBSS oB4soe eS 
e356 sCHECK THAT RHBA HAS 0 
ge? ce¥s02 012737 000000 oDl124 hovV 40, SGODAT ;GET GOOD = 0 
| £359 ;READ RHBA FOR COMPARISON 
t 


MATNOEC-11-DERHAS-8 
CERHAB. SRC T31 


024516 


peus24 
O24E26 


024530 
024530 


0e4S36 
024544 


Se 
024554 


O24556 
C2e4SS6 
024554 
024572 


O24600 
024602 


oo0ceod 001124 


001124 001126 CMP 
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RHSC2 MOPE SIT #8 AND RHCS3 IPCK1 SIT al 


o01124 901126 CMP SGDDAT , $8DDAT 
BE 77$ 
ERROR 111 


773: 
187366 001126 MOV 


SEQ 73$ 
ERROR lle 


738: 
“CHECK THAT RHWC HAS 0 
oo0000 o01124 Moy 80,$GDDAT - 
157272 001126 MOV JRHWC, SBDDAT 
001124 001126 CMP $GDDAT, SBDDAT 
REO 913 
ERROR 113 


;CHECK THAT RHBAE HAS 0 
MOV 80,$GODAT_- 


“RHBAE , SEODAT 
$GDDAT, $BODAT 


ALB 





;COMPARE EXPECTED 
;DATA WITH DATA READ FROM 


: BRANCH IF GOOD © 


sAFTER ae moun SIT at 
: IN RHCS2 TO THE RH 
sos Bir #1 aes WAS SET 
ERO RE MOVED INTO 


‘Rabe WAS READ THEN 
AN RH CLEAR (RHCS2 BIT 85) 
;WAS GIVEN THIS po ULD 
tr ALL ERROR 

RHBA SHOULD HAVE 0 

BUT CONTAINED WHAT IS 
:GIVEN IN BAD RHBA 
;GET GOOD = 0 
; READ ae 4h COMPARISON 
COMPARE EXP 


Pt. WITH SAA READ FROM 
BRANCH IF GOOD 
;AFTER SETTING “CLR” SIT 35 


sIN RHCS2 TO INIT THE RH 
; IPCKI BIT #1 RHCS3 WAS SET 


ZEROS WERE MOVED INTO 


WAS READ THEN 
N_RH CLEAR (RHCS2 BIT #5) | 


ths GIVEN THIS SHOULD 
RR “Hy 


: GIVEN IN BAD RBA E 


;GET GOOD = 0 

;READ RHWC oon. COMPARISON 
; COMPARE EXP 

:DAT "4 WITH AFR READ FROM 
‘BRANCH IF GOOD 


aap + SETTING “CLR” ot a5 


RHCSe_TO INIT THE R 


:IFCK] BIT #1 RHCS3 WAS "SET 


;ZEROS WERE MOVED INTO 


:RH 
:RHDS WAS READ THEN 
: AN RH CLEAR (RHCS2 BIT #5) 





—. 
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DERHAB. SRC T31 


G24604 


O2466C 


C2465 
024674 


024702 
024704 


024706 


at er a ee eee 


< 


OC0304 
012706 
012737 


094737 


012737 


AND RES Teck! SIT #1 


SE TeereSs tenner Sh ar a ker ie ae 
#TEST 32 * RHSCe MOPE BIT #8 AND RHCS3 IPCK2 


HOR HOt 


eeceec ec es eset et ee ae ae 


-* in ARNE cd rn ea ere ee 


MOV 
MOV 832, 28 tSTNM :SAVE TES? NUMBER 
ISR PC, JUCLDISK :GIVE RH INITIALIZE 


CL 
MOV #2, IP ;IPCK BIT NO. FOR PRINTOUT 
BIS arPeKe MRHCS3 ;SET sFEKS IN RHCS3-BIT_#2 
cLR FROM ;WRITE ZERO INTO LOCATION 


MOV HRFROM, JRHDB =: WRITE SEROS INTO RHDS ONCE 
MOY § WRFROM’QRHDS = :WRITE ZERO SECOND TIME 

MOV #DVAIRDY,SGDDAT :GET GOOD = 4200 

MOV MRHCS1,$BDDAT  ;READ RHCS1 FOR COMPARISON 
CMP - $GDDAT’SBDDAT © :COMPARE EXPECT 


RHCS! 
BEQ 6s$ * BRANCH IF GO0o 
ERROR 140 
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;WAS GIVEN ju _—— 
SCLEAR ALL 

;RHWC SH HOUL 0 

; BUT CONTAINED WHAT IS 
GIVEN IN BAD RHWC 

















BIT 
eb LEAR . THE ort BY_A CONTROLLER CLEAR TRHCSS BIT #5) 


THIS SHOULD NOT SE IN RHCS1 
READ RHDS ONCE eu SHO iD. SET tt € (RHCS2 BIT #9) 

OR ROY (SI (BIT #14), SC (BIT #15) 
R 8 A SECOND TIME. ete etK RCS RHCS2; RHCS3 
"CLR™ CRHCS2 BY #5) IS GIVE 
ALL ERRORS ARE CLEARED 
CHECK RHCS1, RHCS2, RHCS3, RHBA, RHBAE, RHWC 












#STACK, SP ;RESET_STACK 






;SETUP UNIT NUBER 
EAR Rec AND FUNCTION gts IN RHCS1 











pCaECK THAT RHCS1 HAS DVA!RDY 












ECTE 
sDATA WITH DATA READ FROM 










Ay SETTING Fh BIT #& 
;1N RHCS2 TO mn NIT TH o 
;IPCK2 BIT #2 RHCS3 WAS SET 
s ZEROS WERE MOVED INTO RHDS 


;RHCS1 SHOULD HAVE DVAIRDY 


=4 
BUT CONTAINED WHAT IS 
:GIVEN IN BAD RHCS1 
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DERHAB. SRC T32 RHSC2 MOPE SIT #8 AND RHCS3 IPCK2 BIT #e 


eics 024706 O17737 157170 901200 MOV JRHOB , STMP 1 ;READ RHDB ONCE 
















75 “CHECK THAT RHCSS HAS 4 
age 024714 012737 000004 o01124 Mov #4, SGDDAT ;GET GOOD = 4 
Ril OTE SE ATEN GRE RRS RE Grose 
guso - - . . ‘CATA WITH DATA READ FROM 










S481 sRHCS3 
S483 024735 001401 BEQ_ «7S [BRANCH IF GOOD 
8483 Os4740 104104 ERROR 104 
g484 AE TER SETTING "CLR" BIT #5 
sIN RHCS2_ TO RH 
S436 
9437 ZEROS HERE MOVED INTO 
8489 
5488 WAS READ THEN 
e480 Rates SHOULD HAVE 4 
8492 ‘QUT CONTAINED WHAT IS 
8493 :GIVEN IN BAD RHCS3 
gyi 02742 675: 
% {CHECK THAT RHCS2 HAS MOPE!OR! IR 





84 
8497 de474e 012737 000700 001124 MOV sMDPE!OR! IR, SGODAT ;GET GOOD = 700 r 
84 024750 053737 005010 O011e4 BIS UNIT, $GDDAT’ ; INCLUDE "UNIT NUMBER 










8500 024756 917737 157106 001126 MOV JRHCS2,S8DDAT  ;READ RHCS2 FOR COMPARISON 
8501 024764 023737 OOlle4 001126 CMP $GDDAT,;SBDDAT  ;COMPARE EXPECTED 

eens sDRTR WITH DATA READ FROM 
8504 24772 901401 BEQ 69$ ;BRANCH IF GOOD 

8505 Ce4¥774 104105 ERROR 105 

8506 tN Re SETTING “CLR” BIT #S 


;l 
8509 ; ZEROS WERE *"ROVED INTO 
: RHDB 






85il ;RHDB_WAS READ THEN 
eeis arise SHOULD HAVE MDPE!OR!IR 






8514 STOGETHER WITH UT NUMBER 
8515 ;BUT CONTAINED WHAT IS 
8516 ;GIVEN IN BAD RHCS2 

8517 024776 69S: 








8619 0924776 017737 157100 091202 MOV _@RHDB.$TMP2 = READ RHDB SECOND TIME 
£520 -CHECK THAT RHCS1 HAS SC!TRE!DVAIRDY 

S5e1 025004 012737 144200 01124 HOV #SCITREIDVAIRDY, SGCDDAT ;GET GOOD = 144200 
823 025012 017737 157042 O01126 MOV ARHCS1, sREAD RHCS1 FOR COMPARISON 
gesg Gsethe 03273? dertae BOISE Map Sc opt’ $EpbAT COMPARE Pepe Stes 

Bees RTA LETH DATATREAD FROM 












Ra CS 
CS2e7 025026 001401 BEQ 71$ ‘BRANCH IF GOOD 
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8528 025030 104140 ERROR 140 
8529 sAFTER SETTING “CLR” BIT #5 








i EROS WERE MOVED INTO 










8534 , :RHDB WAS READ THEN 
8535 sRHCSI ULD HAVE SC!TRE!DVA!RDY , 
Se3° tBuT "EONTAINED MHAT 15 an) 
8538 ;GIVEN IN BAD RHCS1 U0 : 
8539 025032 71S: \ 

| g40 ee ; ySHECK TH THAT pficse HAG ore LR — Pas 

| P 7 
ae BSe0a5 Be5o35 lasahts 881154 bts UN # Tgdboar i FRCLtibe unt? NUMBER Pah 
8544 O2504 017737 157016 001126 “MOV = QRHCS2,$BDDAT READ RHCS2 FOR COMPARISON AN 
8545 025054 023737 001124. 001126 CMP $GODAT,$BDDAT  ;COMPARE EXPECTED 5 
8546 Sea ;DATA WITH DATA READ FROM } 












8547 H 

8548 025062 001401 BEG 73$ BRANCH IF GOOD 

8549 JeS064 104105 pares ERROR 105 

8550 tes. ;AFTER SETTING “CLR” BIT #5 
el. IN RHCS2_TO_INIT THE RH 
8552 :IPCKe BIT #2 RHCS3 WAS SET 
sees igen S WERE MOVED INTO 






‘8555 , RHR WAS READ THEN 

8556 : sRHCS2 SHOULD HAVE MDPE!IR& 
8557 ' ;=500 

8sse ; : TOGETHER WITH UNIT NUMBER 







8sS3 BUT CONTAINED WHAT IS 
8565 GIVEN IN BAD RHCS2 
856! OeS066 738: 

8562 ; CHECK Ve RCS HAS 4 






8553 025066 012737 000004 001124 Mov 4, SGDDAT _ 3GET GOOD = 4 







8564 

8565 S074 017737 157032 001126 MOV MRHCS3,$8DDAT  ;READ RHCS3 ce COMPARISON 
856 $102 923737 001124 O0011e6 CMP SGDDAT, $BDDAT  ;COMPARE EXP 

8557 : :DATA WITH BATA READ FROM 
8568 i ;RHCS3 

8569 025110 001401 BEQ 75$ BRANCH IF GOOD 

8S70 OeSlle 104104 ~~ ERROR 104 

8571 ae ae ;AFTER SETTING “CLR” BIT #5 
8S72 IN RHCS2 TO INIT THE RH 







8573 | HIBCK2 BIT #2 RHCS3 WAS SET 
B574 : :ZEROS WERE MOVED INTO 
8576 | :RHDB_WAS READ THEN 

8577 ;RHCS3 SHOULD HAVE 4 






8579 ‘y : ‘BUT CONTAINED WHAT IS 
e580 . ; GIVEN IN BAD RHCS3 
8581 025114 758: \ 





sGIVE RH INITIALIZE 





8583 025114 004737 O4031e PC, d#CLDISK 




































FRERETTR ERE 
WONMUCWM+-O 


oe 
ee 


8639 
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DERHAB . SRC T32 


Rese 





025120 012737 
017737 
023737 


991491 


025142 
025144 104106 


025146 

0251468 012737 000109 001124 
025154 053737 005010 001124 
025162 917737 156702 001126 
025170 023737 001124 001126 
025176 001401 

025206 104107 

025202 


025202 012737 o00000 001124 
025210 017737 156716 O01126 


MACY11 27(732) 


004200 001124 


156726 001126 
O011e% O01le6 


77$: 


798 
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_ RHSCe MOPE BIT #8 AND RHCS3 IPCK2 BIT #e 


SCHECK THAT RHCS1_HA 
OV BRDY!DVA, SGDDAT ; 

MOV  9RHCS1, SBDDAT 

CMP - $GDDAT; SBDDAT 


BEQ 
ERROR 


HOV 


bys 
MCV 
CMP 


BEQ 
ERROR 


MOV 
MOV 





77$ 
106 


: CHECK THAT RHCS2 HAS IR 
UNIT. $GDDAT 


ARHCS2, SBDDAT 
$GDDAT, $8DDAT 


79$ 
107 


; CHECK y Rae HAS 0 
0, $GDDAT 


JRHCS3, SBDDAT 


;READ RHCS3 FOR COMPARISON 





;SETUP UNIT NUBER 
:CLEAR RHWC AND FUNCTION BITS IN RHCS! 


—_—__- 


ROY! DVA 
T GOOD = 4200 . 
READ RHCS1_FOR COMPARISON 
: COMPARE EXPECTED 


spare MET DATA READ FROM 
BRANCH IF GOOD 


4 SETTING re err aS - 

Bok Aaa #2 Ties Hine SET ; 

gene BERE MOVED INTO t. 

sRHOB WAS R | - 
es 5 BIT #5) 


: WAS GIVEN THIS SHOULD 
SCLEAR ALL ERRORS 

sRHCS | SHOULD HAVE RDY!DVA 
;BUT CONTAINED WHAT IS 


;GIVEN IN BAD RHCS1 Pes Wy 
iM 


:GET GOOD = 100 Ni 
* INCLUDE UNIT NUMBER 
;READ RHCS2 FOR COMPARISON ees 
COMPARE EXPECTED ‘Eey 
:DATA WITH DATA READ FROM 
*RHCS2 
:BRANCH IF GOOD 
AFTER SETTING “CLR” BIT #S 
:IN RHCS2 TO INIT THE RH 
:IPCK2 BIT #2 RHCS3 WAS SET 
sgERGS WERE MOVED INTO 
sR Wes READ THEN 
AR (RHCS2 BIT #5) 

hs GIVE "GIVEN THIS SHOU ULD 

imicse SHOUD RAVE IR 
THER WITH UNIT T NUMBER 


sant CONTAINED W 
;GIVEN IN BAD RCS? 


;GET GOOD = 0 
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;WA given pik — 


‘GIVEN IN BAD RHBAE 


8S$: 
;CHECK THAT RHWC Da 0 
012737 o00000 001124 Mov #0, SGDDAT ;GET GOOD = 0 


017737 156544 001126 MOV JRHWC , SBODAT ;READ RHWC FOR COMPARISON 
023737 001124 001126 CMP SGDDAT,SBDDAT  ;COMPARE EXPECTED 
;DAT A WITH DATA READ FROM 


Cc 
001401 BEQ 87$ : BRANCH IF GOOD 
104113 ERROR 1132 
;AFTER SETTING "CLR" BIT #5 
IN RHCS2_ TO_INIT THE RH 
;1PCK2 BIT #2 RHCS3 WAS SET 
sgERGS WERE MOVED INTO 


; RHOB WAS 
C 


READ THEN 
AR (RHCS2 BIT #5) 
SHOULD 


; GIVEN IN BAD RHWC 


; lig hth i ll 
s ATE RHSC2 MDPE BIT #8 AND RHCS3 IPCK3 BIT #3 
Bear ue aeala an OY 8 CONTROLLER CLEAR (RHCSe BIT #5) 


y eeiT #7) TRE (BIT #14), Sc. SarT #15) 
TIME ret RHCS1, RHCS2; RHCS3 
“CLR” (RHCS2 BIT #S) IS” Give 
ALL ERRORS ARE CLEAR 
CHECK RHCS1, RHCSE. RHCS3, RHBA, RHBAE, RHWC 


i ‘ SLEEK EEELEL EKA TELE KEELES REE EAE EERE LRES REE ELE SH EREE SRLS AE TEE 
025332 opg004 +4133: SCOPE 
025334 012706 o01000 MOV #STACK, SP ;RESET STACK 
025340 012737 600033 oco4ess MOV. #33, a#TSTNM :SAVE TEST NUMBER 


025346 004737 040312 JSR PC, d#CLDISK ;GIVE RH PHI TEAL IZE 


; SETUP pl bees E 
CLEAR R AND FUNCTION Sirs IN RHCS1 
025352 012737 oc00003 O04bEe MOV #3, IP ; IPCK BIT” NO. FOR PRINTOUT 


025360 052777 900010 156544 BIS #IPCK3, JRHCS3 sSET IPCK3_IN RHCS3-BIT #3 
025366 CO5037 04210 CLR WRFROM ;WRITE ZERO INTO LOCATION 


WK IK EC KC KC i i ic 


ewe Se es ee ee ee ese we ee 
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DERHAB.SRC 133 
GR RG AT SRELE IR 


5 
te} 025406 Ole737 OC4200 001124 
reg 025414 017737 156440 001126 
8759 OeS4e2 023737 001124 001126 


8762 025430 001401 
8763 OeS432 104140 





025434 
8774 OeS434 017737 156442 001200 





8778 O25442 012737 O00010 001124 


8 
8780 O254S0 017737 156456 001126 
8781 OeS4S6 923737 O011e4. 001126 


8784 025464 001401 
8785 OeS466 104104 


8796 025470 


8799 925470 012737 000700 001124 
200 e647 053737 O0S010 001124 
Bee 25504 017737 156360 001126 
8803 026612 023737 001124 OO!1z6 


8806 025520 001401 
8807 OesS2e 104105 
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RHSC2 MOPE BIT #8 AND RHCS3 IPCK3 BIT #3 


REROH; SRHDE 


;CHECK THAT RHCS1_HAS DVA!RDY 
#DVA!RDY,SGDDAT ;GET GOOD = 4200 


MRHCS1, SBDDAT 
S$GDDAT ; SBDDAT 


NOV 


Mov 


MOV 
CMP 


BEQ 
ERROR 


6Ss: 


MOV 


MOV 
MOV 
CMP 


BEQ 
ERROR 


675: 


MOV 
BIS 


MOV 
CMP 


BEQ 
ERROR 








655 
140 


JRHDB, $TMP 1 
;CHECK THAT RHCS3 HAS 10 
#10,$6D 


’ @RHCS3, SBDDAT 
$GDDAT , SBDDAT 


67$ 
104 


;CHECK THAT RHCS2 HAS ope TOR! IR 
#MDPE! OR! 

UNIT, sc0bAT’ 

DRHCS2, SBDDAT 

$GDDAT, SBDDAT 


69$ 


105 


HHBHTE EROS. JNTO, Pepe, ONCE 


;READ RHDB ONCE nance 










sREAD RHCS1 for COMPARISON 
; COMPAR — EXPECTED 

:PATA WITH DATA READ FROM Ad 
t BRANCH IF GOOD a 
;QF TER SETTING, “cL BIT #5 


THE RH 
ba Bir "3 TRaes3 WAS SET 
EROS WERE MOVED INTO RHOB 


TWICE 
;RHCSI SHOULD HAVE DVA!RDY 


Bur PCONTAINED WHAT IS 
GIVEN IN BAD RHCS1 


















;GET GOOD = 10 


;READ RHCS3 FOR COMPARISON 
COMPARE EXPECTED 
DATA WITH DATA READ FROM 


‘BRANCH IF GOOD 


s AFTER SETTING “CLR” BIT #5 

;IN RHCS2 TO INIT THE RH 
:IPCK3 BIT #3 RHCS3 WAS SET 
; ZEROS WERE MOVED INTO 


 RHOB WAS READ THEN 
sR S3 SHOULD HAVE 10 
;BUT CONTAINED WHAT IS 
GIVEN IN BAD RHCS3 















;GET GOOD = 700 
OP TNCLUDE’ UNIT NUMBER - 
;READ page 4 COMPARISON = 
:COMPARE EXP 
DATA WITH BATA READ FROM 


sRHCS2 
BRANCH IF GOOD 
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DERHAB. SRC T33 RHSC2 MDPE BIT #8 AND RHCS3 IPCK3 BIT #3 


CaS 
P on ene _* an In shes SET 


tetra 
ose 3 


— 
i 


eee 
'RHDB WAS READ T 
;RHCS2 SHOULD HAVE NOPE!OR? IR 


3270 

TOGETHER WITH rt NUMBER 
BUT CONTAINED WHAT IS 

695 ;GIVEN IN BAD RHCS2 


017737 156352 001202 MOV — QRHDP AD RHDB SECOND TIME 
-CHECK THAT "abs HAs S sci thes WALEDY 
012737 144200 001124 hOV- WSC! TRETDVA! ROY, $GDDA T GOOD = 144200 


025540 017737 156314 001126 MOV MRHCS1,SBDDAT ;READ RHCS1 FOR COMPARISON 
OeSS46 023737 OOlle4 OOlleé CMP $GDDAT;$BDDAT  ;COMPARE EXPECTED 
DATA WITH DATA READ FROM 


sRHCS 
001401 BEQ ss 7718 BRANCH IF GOOD 
104140 ERROR 140 
iON RA SETTING et BIT aS 
HCS2_TO_INIT THE RH 


i TBcks BIT #3 RHCS3 WAS SET 
$gEROS WERE MOVED INTO 


;RHDB WAS READ THEN 
;RHCS1 SHOULD HAVE SC! TRE!OVA!RDY 


=14420 
BUT CONTAINED WHAT IS 
GIVEN IN BAD RHCS1 


025560 713: 
S560 012737 oo00500 001124 St aaa "0 pEVTR SCODAT «GET GOOD = S00 
2eep Re5535 naayt Botte BIS ONT gAboay : INCLUDE UNIT NUMBER 
25574 017737 156270 001126 MOV DRACS2,$BDDAT  ;READ RHCSE FOR COMPARISON 


023737 001124 O0llc6 . CMP SGDDAT, $8DDAT ; COMPARE EXP 
;DAT A WITH BATA READ FROM 


qetedetetetetey 
0000 0: 


OWONIWU £oTu 


bes) 
@ 
ftrur 
t= 


: HCS2 
025610 001401 BEQ 73$ ? BRANCH IF GOOD 


OeSble 104105 ERROR 105 
; ;AFTER SETTING “CLR” aM #5 


sIN RHCS2_TO_INIT THE R 
;IPCK3 BIT #3 RHCS3 _ "eT 
ize ROS WERE MOVED INT 


D8 
RHDB WAS READ THEN 
iateee SHOULD HAVE MDPE!IR 
‘TOGETHER WITH UNIT NUMBER 
:BUT CONTAINED WHAT IS 
Ca :GIVEN IN BAD RHCS2 
> 





169 
RHSC2 MOPE BIT #8 AND RHCS3 IPCK3 BIT 43 


: “CHECK THAT RHCS3 HAS 10 
025614 012737 c00010 001124 MOV #10, $GDDAT sGET GOOD = 10 


OeSse2 017737 156304 001126 MOV @RHCS3,$B0DAT  ;READ RHCS3 FOR COMPARISON 
O025€30 023737 001124 O01126 CMP $GDDAT , SBODAT ; COMPARE EXPECTED 
‘DATA WITH DATA READ FROM 


:RHCS3 
025636 001401 BEQ 7S$ BRANCH IF GOOD 
O25640 104104 ERROR 104 
;AFTER SETTING “CLR” BIT #5 


IN RHCS2 TO INIT THE RH 
;IPCK3 BIT #3 RHCS3 a SET 
sZEROS WERE MOVED INT 


;RH 
;RHDB_WAS READ THEN 
;RHCS3 SHOULD HAVE 10 


=10 
‘BUT CONTAINED WHAT IS 
:GIVEN IN BAD RHCS3 


NAINDEC-11-DERHAB-A MACY 27(738) 22-SEP-76 18:11, PAGE 
DERHAB.SRC 33 


004737 040312 PC, J#CLDISK ‘SE YGP UNIT INITIALIZE 
; CLEAR RHC AND FUNCTION BITS IN RHCS1 


;CHECK THAT RHCS1 HAS RDY!DVA 
O2S646 012737 ocO4e00 001124 MOV #RDY!DVA,SGDDAT ;GET GOOD = 4200 
025654 017737 156200 001126 MOV MRHCS1,SBDDAT ;READ RHCS1 oct COMPARISON 
OeS662 023737 O0lle4% 001126 CMP $GDDAT,$BDDAT  ;COMPARE EXP 
:DATA WITH DATA READ FROM 


;RHCS1 
025670 001401 BEQ 77$ BRANCH IF GOOD 
025572 104106 ERROR 106 
HIN RACSE TO. “CLR” BIT #5 


C T 
ZEROS WERE MOVED INTO 


;RHDB WAS READ THEN 
AN RH CLEAR serene | J #5) 


4300 
ay CONTAINED WHAT IS 
GIVEN IN BAD RHCS1 


025674 778: 

;CHECK THAT RHCS2 HAS IR 
025674 012737 000100 001124 MOV #IR, SGDDAT ;GET GOOD = 100 
025702 053737 OO05010 001124 BIS UNIT, $GDDAT INCLUDE UNIT NUMBER 


025710 017737 156154 001126 MOV QRHCS2,$B8DDAT ;READ RHCS2 FOR COMPARISON 


025716 023737 O0112e4% 001126 CMP $GDDAT;SBDDAT  ;COMPARE EXPECTED 
;DATA WITH DATA READ FROM 













DERMRE-SRE Tad)“ RACE NOPE BIT 48 AND RMS TPCKS BIT yo 






;RHCS2 
8921 025724 001401 BEQ 79$ ;BRANCH IF GOOD 
ass 025726 104107 ERROR 107 ‘i 
Ad SETTING “CLR” BIT #5 
924 N RHCSe TO INIT THE RH 












8925 i TPck 3 BIT #3 RHCS3 WAS SET 
8926 ZEROS WERE MOVED INTO 

8327 | ; RHDB 

8928 ;RHDB WAS READ THEN 

8929 —_— sAN_RH CLEAR (RHCS2 BIT #5) 
8930 :WAS GIVEN THIS SHOULD 

8931 ;CLEAR ALL ERRORS 

Base ene SHOULD HAVE IR 
8934 TOGETHER WITH UNIT NUMBER 
8935 ;BUT CONTAINED WHAT IS 

8936 GIVEN IN BAD RHCS2 

8937 025730 798: 

8938 Biggin ';CHECK THAT RHCS3 HAS 0 

Baan 025730 012737 000000 001124 MOV #0, $GDDAT ;GET GOOD = 0 













8941 025736 017737 156170 001126 MOV JRHCS3,SEDDAT  ;READ RHCS3 FOR COMPARISON 
8942 025744 023737 001124 OOlie6 CMP  $GDDAT;SBDDAT  :COMPARE EXPECTED 

su sDATE WITH DATA READ FROM 
B94S5 025752 O01401 BEQ sé :BRANCH IF GOOD 

8946 025754 104110 ERROR 110 

8547 : sQFTER SETTING "CLR" BIT #5 
94g N RHCS2 TO INIT THE RH 
9949 i TPck 3 BIT #3 RHCS3 WAS SET 
8950 , :ZEROS WERE MOVED INTO 

8951 :RHOB 

e952 —TRHDB WAS READ. THEN 

8953 } TAN RH CLEAR (RHCS2 BIT #5) 
9954 :WAS GIVEN THIS SHOULD 

9955 | : CLEAR ALL ERRORS 

g9c6 :RHCS3 SHOULD HAVE O 

2957 :BUT CONTAINED WHAT IS 

e958 | : :GIVEN IN BAD RHCS3 

8959 o25756 81S: 

8960 . ;CHECK THAT RHBA HAS 0 

8961 025756 012737 O00000 001124 MOV #0,SGDDAT — ~~ ;GET GOOD = O 






8963 025764 017737 156074 001126 MOV JRHBA, SBDDAT ;READ RHBA FOR COMPARISON 
8964 025772 023737 O0112e4 OO0lleb CMP $GDDAT,SBDDAT  ;COMPARE EXPECTED 







8965 ;DATA WITH DATA READ FROM 









8966 ‘ ;RHBA 

8967 026000 001401 BEQ 83$ BRANCH IF GOOD 

8968 026002 104111 ERROR 111 

8969 ;AFTER SETTING mF BIT #5 
897 IN RHCS2 TO_INIT THE RH 
8971 ;IPCK3 BIT #3 RHCS3 WAS SET 
8972 ; ZEROS WERE MOVED INTO 






8974 . 'RHDB WAS READ THEN 
} "AN RH CLEAR (RHCS2 BIT #5) 
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T33 


012737 
017737 
023737 


001401 
104112 


012737 


017737 
023737 


. 001401 


104113 


; CHECK "e erne HAS 9 
000000 001124 OV “n 


156112 001126 
001124 001126 


;CHECK THAT RHWC_HAS 0 
000000 001124 OV #0, $GDDAT 


156016 001126 
001124 O011e6 







ice GIVEN EFEGR pt 


ate 
iB OBE WHAT IS 


;GIVEN IN BAD RHBA 


;GET GOOD = 0 


;READ oe An COMPARISON 
; COMPARE, EXP rep 
;DATA TH BATA EAD FROM 


H 
t BRANCH IF GOOD 


;AFTER SETTING “CLR” BIT #5 
IN RHCSe TO INIT THE RH 
SIPCK3 BIT #3 RHCS3 WAS SET 
igEROS WERE MOVED INTO 





$RHOB WAS READ T 


Caos 7 


;GET GOOD = 0 


;READ RHWC FOR COMPARISON 
COMPARE EXPECTED 
;DATA WITH DATA READ FROM 


BRANCH IF GOOD 
; AFTER a5 TING “CLR” of a5 
31 INIT THE R 







C 
EROS WERE MOVED INTO 


;RHDB WAS READ THEN 
AN RH CLEAR Ne Bat #5) 


‘GIVEN IN BAD RHWC 


[Cosgreasonnnacscosseucscaesenenseeenenssesenenenceeeteasaneene 
RHCSe-WCE BIT #14 AND RHCS3-WCE OW BIT #12 
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$087 ;WRITTEN ON THE DEVICE 


:* CLEAR THE SUBSYSTEM BY A CONTROLLER ChEAR (RHCS2 BIT #5) 
v4 WRITE N NINE WORD OF ALL NINES ON TO THE DEVICE 
:% SET UP TO 60 Het E CHECK ON THAT Moro FROM AN 
i 050 WORD 80UN 
:* DO A ONE WORD WRITE CHECK WITH RHBA FROM AN 
:* 90D WORD BOU UNDARY 
- THIS SHOULD SET WCE OH (RHCS3 BIT #12) 
= AND Yee HCS2 BIT #14 
:* “CLR” ( RHess SIT #5) tg GIVEN 
:* ALL ERRORS ARE CLEARED 
:* CHECK RHC51, BHeSS. RHCS3, SHA, RHSAE, RHWC 
‘ + SETERELSSSREFFLLRSSERSSLSRSSLEKSLAARAARF ESSERE SSLSS SESS SF SARS S2 
2048 926069 999004 tétgu: SCOPE 
SOs? O260b2 Ole706 001000 MOV eSTACK, SP sRESET STACK 
2048 O26066 012737 900034 oo4ess MOV #34, aT TNM :SAVE TEST NUMBER 
9050 o28074 004737 940312 ISR PC, JSCLDISK :GIVE RH INITIALIZE 
$051 ; SETUP UNIT NUBER 
205 : CLEAR RHC AND FUNCTION BITS IN RHCS: 
at : WRITE ONE, Wo ORD oF ALL oes oN watt DEVIC cc 
ser ste Stetes i eeae ena oy JRHW WW 2 Ne ce rae = OUNT R REGISTER 
, . weSi ii (¢ é 15S?! AAT I ISTE 
oe s5ei78 Sis777 Gox#2i0 1 2538 Moy ewe HBA Ne. me a BUFFER INTO BuS ADRESS 
S059 o26122 o04077 156512 *. * JSR” RO, @COMND 360 TO DO COMMAND 
3050 O26126 SO4is4 WRIDAT :WRITE DATA 
$$ ;SET UP FOR WRITE CHECK 
$063 026130 005037 003002 cr BUFO sWRITE DATA. FOR WRITE CHECK ERROR 
$064 026134 12777 177767 155720 MOV JRHWC :NINE WORD FOR WORD COUNT REGISTER 
so6s 26142 812777 OGo3002 155714 MOV sacton JRHBA saRITE FROM BUFFER INTO BUS ADDRESS 
$066 FROM 900 WORD BOUNDRY 
3567 iWRITE CHECK oN 00D WoRO’ BOQUNDAR 
SES O26150- OC4O77 1564E4 $SR RO, SCOMND ‘oe ie 50 COMMAND 
2083 O26154 OO4150 WRCHEK E CHECK DATA 
f 
$971 
$672 
9673 
3074 » CHECK THAT RHCS2_HAS ce OR! IR 
| $075 O2€156 012737 o40300 001124 hoy WCE! OR'IR, $GODAT sGET GOOD = 40300 
| 207 026164 053737 O08010 cdlle4 sis UNTT. $cD0at ; INCLUDE UNIT NUMBER 
O78 026172 017737 1SS&72 001126 MOV DRHCS2,$8DDAT  ;READ RHCS2 FOR COMPARISON 
3073 O26200 023737 001124 O01iz2e CMP $GDDAT.$BDDAT  :COMPARE EXP 
z50 DRT 2 WITH Bata READ FROM 
| $982 get2e06 901401 BEQ 653 :BRANCH IF GOOD 
863 26210 104114 ERROR 114 
9584 SAFTER SETTING “CLR” 8: I 85 
Stes :IN RHCS2 TO INIT THE R 
3756 :ONE WORD OF ALL ONES 7 
| 
| 
j 





14 
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3083 ;A WRITE CHECK WAS. DONE 
9039 iat AN QOD WORD BOUNDARY THEN 






$030 ; HCS2 SHOULD HAVE WCE!OR!IR 










3031 3 e030 
$2 i TOGETHER WITH UNIT NUMBER 
30 : BUT CONTAINED WHAT IS 
O38 : GIVEN IN BAD Rice 
ae O262i2 6s$: 
3o37 yma THAT RHCS3 HAS DBL! WCEOW 
anes Ozb2l2e Ole7s? O12000 001124 Mov #DBL!WCEOW, SGDDAT ;GET GOOD = 12000 
9100 026220 017737 155706 901126 MOV JRHCS3,$BDDAT READ RHCS3 FOR COMPARISON 
9101 Oes226 O83737 OOlies Ofl126 CMP $GDDAT, $8DDAT : LONPARE EXPECTED 
$193 “DATA WITH DATA READ FROM 
$103 RHC $3 
9204 Oe6234 00140) BEQ &7$ : BRANCH IF GOOD 
$105 2626 104115 FRROR 115 
S106 sAFTER SETTING “CLR” BIT eS 
$107 IN RHCS2 TO INIT THE RH 
$108 : ORD OF ALL ONES IS 
g109 iHRITTEN ON THE DEV 
8110 TE CHECK WAS DONE 
Siil iN AN ODD WORD BOUNDARY THEN 
Sliz RHCS2 SHOULD HAVE DSLIWCEOW 
$113 212000 
Sil taut CONTAINED WHAT IS 
3115s = e : GIVEN IN SAD RHCS3 
S1ig o26240. 675: 
gig ; 
,§ 

3133 026248 OC4737 O4O312 JSR PC deCLDISK GIVE RH PNT TTA CE 
sie: : CLEAR RHC AND FUNCTION BITS IN RHCS: 
Sizs 
9124 ;CHECK THAT RHCS1 HAS RDY!DVA 
z1E5 026244 012737 904200 001124 | hav #ROY!DVA,SGDDAT ;GET GOOD = 4200 
$127 Oe6e52 017737 155602 001128 - — MOV DRHCS1,$B0DRT  ;READ RHCS! of oh COMPARISON 
Sipg fese60 923737 001124 OGllee CMP $GDDAT. SBDDAT : COMPARE Te 
$123 :DAT A WITH “DATA EAD FROM 
3130 :RH HCS1 
S131 Oe&266 001401 BEG 63$ : BRANCH IF Good 
9135 026270 104116 ERROR 116 
Si33s sAFTEP SETTING “CLR” ait 85 
sis4 : IN RHCS2 TO INIT THE & 
$135 ONE WORD OF _A Es 
Siz WRITTEN ON THE ube hss 

$137 cA OW oh CHECK WAS DONE 
Size ;ON AN ODD BORD BOUNDARY THEN 
3:33 ;AN_RH CLEAR (RHCS2 BIT #5) 
$140 : SHOULD 
$14] 

643 
$143 









3148 


OOW WD OOOO WD OVW OWW DOO OD OW OOWOODO OODOHOODODOWOODOHOODDWODWOOW 
0 2 = sb = 82 be Ob 8 Be = be bs be 2 0s 00 Bo es 2 ho be D2 me Bo 0 bs 0 2 2 2 Bs 8 0 2 b—2 0 8 Bo 8 Be b 2 be 0 bm 


OW 
Witi be] 


Ren ESO Bee eran L ColOr a) Gord 2 Csr CD 0D UPON E CoPOr Coe TOUTE Coro 
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O2$27e 


026272 
026300 


026306 
026314 


026322 
026324 


026326 
026326 


026334 
C26342 


026350 
026352 


026354 
026354 


C2632 
026370 


exes 27(732) 
TH RHCS2-WCE BI 


QOle73? 000109 001124 
Rege3¢ aiahts O0i124 
017737 155556 001126 
Oe3737 O01le4% 001126 
391491 

194117 

O1e737 c00000 001124 


017737 155572 001126 
023737 OOll2e4% O01126 


012737 000000 001124 


017737 - 158476 001126 
623737. O01i24 oo1iee 





69$: 


718: 


733: 








ee-SeP-/ 15: 
#14 AND RHCS3-WC 


iene TH ys! RHCSe_HAS IR 


BIS 


MOV. 
cop 


BE 
ERROR 


MOV 


hoy 


MOV 
CMP 





hI PAGE 174 
OW BIT s#le2 


Sart SgtpRaT 


@RHCS2, SBODAT 
$GDDAT, $BDDAT 


71$ 
117 


14 


;CHECK THAT RHCS3 HAS 0 
#0, $GDDAT 


@RHCS3, $BDDAT 


SGDDAT, S8DDAT 


733 
120 


0, $GDDAT 


JRHBA, SBODAT 
SGDDAT, SBDDAT 


; CHECK i RHBA_HAS 0 





;BUT_ CONTAINED WHAT IS 
;GIVEN IN BAD RHCS1 


;GET G os 
INCLUDE UNI ORUMBER 


;READ ae Ate COMPARISON 
: COMPARE EXP 

3DA ete ATR READ FROM 
‘BRANCH IF GOOD 


seen SETTING “CLR” BIT #5 


RR 

RucSe SHOULD HAVE IR 
$7100 ce WITH UNIT NUMBER 

'BUT CONTAINED WHAT IS 

SB YVEN CIN BAD. Reese 

:GET GOOD = 0 

sREAD RHCS3 FOR COMPARISON 

I COMPARE EXPECTED 

:DATR WITH DATA READ FROM 

“BRANCH IF GOOD 


SAFTER SETTING "CLR" BIT a5 
SIN RcSe °0 INIT . ae 


;0N AN 
;AN_RH LEAR CRESS BIT #5) 
; G OU 


CO 
GIVEN ms BAD RHCS3 


;GET G00D = 0 


;READ RHBA pee TER PARISON 
:COMPARE EXP 
;OATA WITH BATA READ FROM 








92 
$201 e637 


asns 0240 


026402 
026402 


026410 
026416 


fUfurulolulufuforururure 


TUTUO o-- 0 0-+ 0 b-< 9-0 0-2 oo 
-—-OVOO ICU £OITUEH-O 


Se2e 
S2e3 026424 
026426 


32 

9237 026430 
$238 

9239 026430 
Se 


e241 O26436 
Se4e ODeb444 








S245 des4Se 
Se4E 9 O26454 
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T34 


001491 
104121 


012737 
017737 
023737 


0014C1 
104122 


012737 
017737 
023737 


001401 
104123 


MACYL1 27(732) 


009000 o01124 


155514 O01le6 
001124 01126 


000000 001124 


165420 001126 
O011e4% O011e6 
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778: 


BEQ 
ERROR lee 


Mov #0, $GDDAT ;GET GOOD = 0 


MOY DRHWC,SBODAT = ;READ RHWC FOR COMPARISON ee 
CMP $GODAT,SBDDAT :COMPARE EXPECTED * 


BEQ 
ERROR 123 


















;RHBA 
BEQ 7$$ ;BRANCH IF GOOD 
ERROR ict 
sAFTER SETTING 1 ne he BIT #€ 





Q 
BUT CO NYAINED nay IS 
GIVEN IN BAD RHBA 


-CHECK THAT RHBAE HAS 0 
MOV #0, SGDDAT :GET GOOD = 0 


MOV JRHBAE,SBDDAT © ;READ RHBAE FOR COMPARISON 
CMP §GDDATSSBDDAT © [COMPARE EXPECTED 

;DATA WITH DATA READ FROM 
A : RHBAE 
778 {BRANCH IF GOOD 


ya SETTING “CLR” af a5 
:IN Q INIT THE RH 







at IN BAD RHBAE 






;CHECK THAT RHWC ta 0 














J 






spar e WITH DATA READ FROM ‘2 
73$ ‘BRANCH IF GOOD 
sAF TER SETTING “CLR” BIT a5 











r My CHECK WAS DONE 
ON N ODD WORD BOUNDARY [yen 
N RM CLEAR ‘RHCSe BIT #5) 
iflas GIVEN THIS SHOULD 
CLEAR ALL ERRORS 
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9256 sRHWC SHOULD HAVE 0 

asec ¢BUT CONTAINED WHAT IS 

a5 3 026456 79$ 

9260 

9261 

9262 

$263 3  RRKSHLEALKRHLEKLA ASHES LEAKS RSS HRA KALE SRA SAA RASA SAAS SASS SLE LESS SS 

aed :*TEST 35 RHCS2-WCE BIT #14 AND RHCS3-WCE OW BIT sie 

$265 :% CLEAR THE SUBSYSTEM BY A CONTROLLER CLEAR (RHCS2 BIT 45) 

9367 :% WRITE NINE WORD OF ALL NINES ON TO THE DEVICE 

9268 :% SET UP TO DO WRITE CHECK ON THAT WORD FROM AN 

9269 + OOD beep BOUNDARY 

9270 1 DO A ONE WORD WRITE CHECK WITH RHBA FROM AN 

9271 % 900 WORD BOUNDARY 

9272 :# THIS SHOULD SET, WCE OW, (RHCS3 BIT #12) 

9273 1% AND WCE (RACs BIT 

9374 1% "CLR" (RHCSe 8 #5) Me GIVEN 

9375 x ALL ERRORS ARE 

676 1% CHECK RHCS1, cee RHCS3, RHBA, RHBAE, RHWC 

$278 © SLELKERAFRRSFEREAARAAAA REELS RELA SLRALSHASSAASARA REL SE SREAEKELHEFEKE 

$279 o264s6 occooo4 +4735: SCOPE 

9280 O2s460 O12706 001000 MOV #STACK, SP sRESET STACK 

3281 026464 012737 090035 oo4ess MOV #35, a8 TSTNM ‘SAVE TEST NUMBER 

3283 026472 004737 o40312 JSR PC, J¥CLDISK sGIVE RH INITIALIZE 

3285 *CLEAR RHWC AND FUNCTION SITS IN RHCS! 

$287 - WRITE ONE WORD OF ALL ONES ON THE DEVICE 

9288 O26476 012737 177777 OO4210 Mov , WREROM L ONES INTO WRITE. FROM 

$289 026504 012777 177767 155350 . MOV JRHWC ‘NINE WORD FOR WORD COUNT REGISTER 

3230 O26512e O1e777 Oo42eio0 155344 © MOV 3a JRHBA ;WRITE FROM BUFFER INTO BUS ADDRESS 

9292 O26520 004077 156114 JSR RO, ACOMND :G0 TO DO COMMAND 

3233 026524 904154 WRIDAT “WRITE DATA 

9295 -SET UP FOR WRITE CHECK 

9296 026526 005037 003002 éLR BUF OW sWRITE DATA FOR WRITE CHECK ERROR 

9297 G26532 012777 177767 155322 MOV JRHWC *NINE WORD FOR WORD COUNT REGISTER 

9298 026540 012777 003002 155316 MOV scr ON aRHBA sWRITE FROM BUFFER waht? BUS ADDRESS 
. 9e99 | . FROM 900 WORD BOUND 

9300 ; “WRITE CHECK ON ODD: WORD’ BOUNDAR 

9301 O2654 004077 156066 SSR RO, JCOMND :G0 TO 50 COMMAND. 

3208 026552 004150 WRCHEK ;WRITE CHECK DATA 

$304 

9305 

$306 

9207 :CHECK THAT RHCS2 HAS WCE!OR!IR 

9308 O26554 012737 O40300 001124 Mov #WCE! OR! IR, SGDDAT :GET GOOD = 40300 

$203 O2e56e 03737 OOS010 001124 BIS UNIT, $GDDAT INCLUDE UNIT NUMBER 


9311 026570 017737 155274 O0ll26 MOV SRHCS2,$BDDAT  ;READ RHCS2 FOR COMPARISON 
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026576 


026604 
O26&06 


026610 
026610 
Oeb615 
026624 


026632 
026634 


026536 


025636 


Oebb42 
026650 
026655 


02664 
O2b655 





023737 001124 O011e6 


001401 


104114 


012737 
017737 
023737 


001401 
104115 


004737 


012737 
017737 
023737 


001401 
104116 


012000 


155310 
001124 


040312 


004200 


155204 
001124 
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001124 


001126 
001126 


001124 


001126 
001126 
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. 658: 


=$: 


Ov 


CMP 


BEQ 
ERROR 


MOV 


- CMP 


BEQ 
ERROR 


JSR 


hov 


MOV 
CMP 


BEQ 
ERROR 


$GDDAT , SBDDAT 


65$ 
114 


$GDDAT; SBDDAT 


67$ 
115 


PC, ad#CLOISK 


; COMPARE EXPECTED 
;DATA_WITH DATA READ FROM 


 BRONCH IF GOOD 


-}AFTER SETTING “CLR” IT 85 


SIN RHCS2 TO INIT THE R 
ALL 


pat SHOULD HAVE WCE!OR!IR 


S TOGETHER WITH UNIT NUMBER 
BUT CONTAINED WHAT IS 
GIVEN IN BAD RHCS2 


;CHECK THAT RHCS3 HAS DBL!WCEOW 
#DBL!WCEOW, SGDDAT 


@RHCS3, SBDDAT 


;GET GOOD = 12000 
;REQD sige de COMPARISON 
: COMPARE - EXP 
;DATA WITH BATA READ FROM 


BRANCH IF GOOD 


4 ify 't as TIN “CLR” a #5 


WAS DONE 
RD B80 UNDARY THEN 
-RHCS3 SHOULD HAVE DBL!WCEOW 


=120 
BUT CONTAINED WHAT IS 
;GIVEN IN BAD RHCS3 


;GIVE he {MITTAL Ize 
SETUP U BE 
; CLEAR Ric AND FUNCTION BITS IN RHCS1 


;CHECK THAT RHCS1 HAS RDY!DVA 


#RDY!DVA,SGDDAT ;GET GOOD = 4200 


JRHCS1 , SBDDAT 
S$GDDAT | SBDDAT 


69$ 
116 


;READ RHCS1 FOR COMPARISON 
;COMPARE EXPECTED 
;DATA WITH DATA READ FROM 


s RHC 
BRANCH IF GOOD 


;AFTER SETTING “CLR” BIT #5 
;IN RHCS2 TO INIT THE RH 





DERNRBCSAG tse «|| RACSPLURE IP wid AND RUeSoURce OW BIT al 
a Ft gs 
Tey Shel Wa a, 
(RHCS2 BIT 
HIS, SHOULD 
LER CHOUED HAVE ROY!DVA 


;=4200 
;BUT CONTAINED WHAT IS 
GIVEN IN BAD RHCS1 


69S: 
;CHECK THAT RHCS2 HAS IR 
012737 001124 MOV #IR, SGDDAT ;GET GOOD = 100 
053737 001124 BIS UNIT. $GDDAT ; INCLUDE UNIT NUMBER 


017737 001126 MOV @RHCS2,$B8DDAT ;READ a. Ae COMPARISON 
023737 001126 CMP S$GDDAT,$BDDAT  ;COMPARE EXP 
pate WITH BATA READ FROM 
026720 001401 BEQ 71$ BRANCH IF GOOD 


Oe&72e 104117 ERROR 117 
iat SETTING “CLR” BIT #5 


CLEAR (RHC 
WAS GIVEN THIS SHOUL 

CLEAR ALL ERRORS 
RHCS2 SHOULD HAVE IR 


;=100 
; TOGETHER WITH eat NUMBER 
i108 CONTAINED WHAT IS 
;GIVEN IN BAD RHCS2 


026724 718: 
;CHECK THAT wi HAS 0 
O267e4% 012737 COGQ00 001124 Mov #0, SGDDAT ;GET GOOD = 0 


026732 017737 155174 001126 MOV MRHCS3,SBDDAT ;READ RHCS3 FOR COMPARISON 
026740 023737 001124 O011e6 CMP SGDDAT;SBDDAT  ;COMPARE EXPECTED 

ate MIT DATA READ FROM 
026746 001401 BEQ 73$ BRANCH IF GOOD 


026750 104120 ERROR 120 
OTs TANG 1 en #5 


L ERRORS 
*RHCS3 SHOULD HAVE 0. 
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9424 ;BUT CONTAINED WHAT IS 
9425 a | :GIVEN IN BAD RHCS3 
428 026752 738: 
:CHECK THAT RHBA HAS 0 
g428 026752 012737 000000 o01124 HOV #0, $GDDAT ;GET GOOD = 0 
9430 O26780 017737 155190 001126 Noy @RHBA,SBODAT_ READ. RBA FOR_ COMPARISON 
9431 026766 023737 01124 OOll26 CMP  $GDDAT,SBDDAT COMPARE EXP 
23 ;OATA WITH BATA READ FROM 


9434 026774 001401 BEQ 75$ ‘BRANCH IF GOOD 
eaae 026776 104lel ERROR iel 


jAFTER SETTING a # BIT aS 


K WAS DONE | 
S441 ‘ON AN ODD “wi BOUNDARY THEN 
3442 SAN RH CLEAR (RHCSe BIT #5) 
S443 :WAS GIVEN Mat SHOULD 
S444 CLEAR, ALL ERRORS 
S445 ;RHBA SH Ou ULD HAVE 0 
S446 : BUT CONTAINED WHAT IS 
S447 :GIVEN IN BAD RHBA 
9448 027000 758: 
9449 ;CHECK THAT ner HAS 0 
eet 027000 012737 O00000 001124 Mov #0, $GDDAT ;GET GOOD = 0 
9452 027006 017737 155116 001126 MOV @RHBAE,SBDDAT  ;READ RHBAE A COMPARISON 
9453 027014 023737 001124 001126 CMP $GDDAT,SBDDAT  ;COMPARE EXPECTED 
gaze sata WITH DATA READ FROM 
$456 Oe70e2 901401 BEQ 77$ BRANCH IF GOOD 
9457 Oe702e4 104122 ERROR lee 
9458 Al SETTING TY He he +s 


9469 : 'GIVEN IN BAD RHBAE 


9470 027026 778: 

9471 ;CHECK THAT RHWC A ae 0 

gu95 027026 012737 CO0000 O00112e4 MOV #0, SGDDAT ;GET GOOD = 0 

9474 027034 017737 155022 O0lle6 MOV @RHWC , SBDDAT ;READ RHWC oon ain 
9475 Oe7042 023737 001124 001126 CMP $GDDAT,$BDDAT © ;COMPARE EXP 

9476 :DATA WITH BATA READ FROM 
$477 : RHWC 

9478 O27050 001401 BEG Se :BRANCH IF GOOD 


9479 027052 104123 ERROR 123 
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nN r ecSe 10 Gy TF RHE a V #5 
P ALL ones, IS 

ee oN THE DEVIC 

:A TE CHECK 


K_WAS DONE 
ON AN ODD WORD BOUNDARY THEN 
SAN RH CLEAR (RHCSe BIT #5) 


: GIVEN IN BAD RHWC 
798: 


i lle F411 alt fi te t-te tl 
T 36 RHCS2-WCE BIT #14 AND RHCS3-WCE EW BIT #11 


CLEAR THE SUBSYSTEM BY A CONTROLLER CLEAR (RHCS2 BIT #5) 
ays NINE WORD OF ALL NINES ON TO THE DEVICE 

SET UP TO DO W ws CHECK ON THAT WORD FROM AN 

EVEN —_ BOUNDAR 

DO_A ONE gd WRITE CHECK WITH RHBA FROM AN 
EVEN WORD BOUN 

THIS ag SET _WCE ale (RHCS3 BIT #11) 

AND os (RHCS 


e 
nae A att 45) IS GIVEN 
ERR ORS AR 
CHECK RHCS1, RHEE. RHCS3, RHBA, RHBAE, RHWC 


© SHKKERELELERERESL ELAS A RAERES SHEAR LA SHAKES EES EARS RHERAKRAK EELS RSELE 
027054 900004 +éT36: SCOPE 

027056 Ole706 001000 MOV #STACK, SP RESET STACK 

027062 Ole737 600036 oo4Ess MOV #36, J8TSTNM :SAVE TEST NUMBER 


004737 040312 JSR PC, a#CLDISK ;GIVE RH INITIALIZE 
SETUP UNIT NUBE 
:CLEAR RHWC AND FUNCTION BITS IN RHCS1 


WRITE ONE WORD OF ALL ONES ON THE DEVIC E 
012737 177777 004210 hov , WRF ROM sALL ONES 


WRITE FROM 
177767 154752 MOV dRHW NINE WORD FOR WORD COUNT REGISTER 
O042i0 154746 MOV +3 ae SHEA ;WRITE FROM BUFFER INTO BUS ADDRESS 


155516 JSR RO, JCOMND 30 TO DO_COMMAND 
004154 WRIDAT ;WRITE DATA 


-SET UP FOR WRITE CHECK 
027124 005037 003000 écR BUF EW ;WRITE DATA FOR WRITE CHECK ERROR 
027130 012777 177767 154724 MOV QRHWC ‘NINE WORD FOR WORD COUNT REGISTER 
027136 012777 603000 154720 MOV sBUrEW JRHBA sWRITE FROM BUFFER INTO BUS ADDRESS 

FROM EVEN WORD BOUNDRY 

‘WRITE CHECK ON EVEN WOR} BOUNDAR 
027144 004077 155470 SSR RO, JCOMND 66-10-60. COMMAND 
027150 OO4iS0 WRCHEK ‘WRITE CHECK DATA 


WE HE OK IK CK ic oe i ic oe 


’ 
° 
, 
. 
$ 
5 
. 
’ 
. 
s 
. 
s 
. 
: 
. 
s 
. 
’ 
. 
5 
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DERHAB. SRC T36 RHCS2-WCE BIT #14 AND RHCS3-WCE EW BIT #11 


? 737 94030 iV  WIGETORTIR SCOURT- :GET GoOD = 40300 
neta Rb5535 ate BS oNTT Seabat ; INCLUDE’ UNIT NUMBER 


027165 017737 154676 MOV @RHCS2,$BDDAT ;READ RHCS2 FOR COMPARISON 
027174 923737 001124 CMP $GDDAT; SBDDAT ; COMPARE EXPECTED 
DATA WITH DATA READ FROM 


; RHC 
O27232 001401 SEQ 6S$ BRANCH IF GOOD 


027204 104114 ERROR 114 
;AETER SETTING "CLA" BIT aS 
aes SIN RHcSe 10 INIT THE 

ZONE Wd ORD OF ALL ONES is 
SWRITTEN ON THE DEVICE 
:A WRITE CHECK WAS DONE 
Z0N AN EVEN WORD BOUNDARY THEN 
;RHCS2 SHOULD HAVE WCE!OR! IR 


=4 
TOGETHER WITH at NUMBER 
:BUT CONTAINED WHAT IS 
: GIVEN IN BAD Rucs2 

027206 


;CHECK THAT RHCS3 HAS DBL! WCEEW 
027206 012737 006000 001124 MoV #DBL!WCEEW, SGDDAT ;GET GOOD = 6000 


027214 017737 154712 001126 MOV @RHCS3,SBDDAT  ;READ page eo dene 
O2e7e222 023737 O0112e4 O01ie6 CMP SGDDAT, $BDDAT  ;COMPARE EXP 
: DATA WITH BATA READ FROM 


, : RHC 
027230 001401 BEQ 67$ :BRANCH IF GOOD 


;AFTER SETTING “CLR” BIT #5 


027232 104115 ERROR 115 
IN RHCS2 TO INIT THE RH 
:ONE WORD 


; ECK WAS DONE 

ON AN "EVEN WORD BOUNDARY THEN 
sRUCS SHOULD HAVE DBL!WCEEW 
;BUT CONTAINED WHAT IS 


GIVEN IN BAD RHCS3 
027234 


027234 004737 040312 PC, d#CLDISK ;GIVE RH INITIALIZE 
:SETUP UNIT NUBER 
; CLEAR RHIC AND FUNCTION BITS IN RHCS1 


;CHECK THAT RHCS1 HAS RDY!DVA 
027240 012737 OO04200 001124 Mov #RDY!DVA,SGDDAT ;GET GOOD = 4200 





MAINDEC-11-DERHAB-A 
DERHAB. SRC T36 
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RHCS2-WCE BIT #14 AND RHCS3-WCE EW BIT #11 


a eS UTE ASN OBHRE CMP ScOGAT; SeDDAT 


en SS a 
WO IOUT 


7262 
7264 


027266 
027266 

7274 
027302 
027310 


027316 
027320 


027322 
027322 
027330 
027336 


027344 
027346 


68 


1401 
4116 


C12737 
053737 


017737 
023737 


012737 
017737 
023737 


001401 
104120 


BEQ tr 


ERROR 116 
695: 
-CHECK THAT RHCS2 HAS IR 
o00100 001124 Mov #IR, SGDDAT 
005019 001124 BIS UNIT $GDDAT 
1S4S62 001126 MOV JRHCS2, SBDDAT 
001124 001126 CMP $GDDAT, SBDDAT 
BEQ 71$ 
ERROR 117 
718: 
“CHECK THAT RHCS2 HAS O 
po0000 001124 MOV #0, SGDDAT 
154576 001126 MOV JRHCS3, SBDDAT 
001124 O011e6 CMP $GDDAT; $BDDAT 
BEQ 733 
ERROR 120 


REN one Papee eae a 
sare WITH BATA. READ FROM 
BRANCH IF GOOD 


;AFTER SETTING “CLR” B 


IT #5 
s IN RHCSe iY INIT THE RH 


N_RH CLEAR (RHCSe BIT #5) 
it GIVEN THIS SHOULD 
CLEAR ALL ERRORS 
RACE SHOULD HAVE RDY!DVA 


=42 
‘BUT CONTAINED WHAT IS 
GIVEN IN BAD RHCS1 
;GET GOOD = 100 
; INCLUDE UNIT NUMBER 
;READ RHCS2 FOR COMPARISON 
;COMPARE EXPECTED 
;DAT A_WITH DATA READ FROM 
BRANCH IF GOOD 


iON RR SETTING “CLR” BIT #5 
NIT THE RH 


ALL ERRORS 
Ruse SHOULD HAVE IR 
TOGETHER WITH eat y een 


iy CONTAINED W 
:GIVEN IN BAD RCS? 


;GET GOOD =O. - 
;READ RHCS3 FOR COMPARISON 


COMPARE EXPECTED 
;DATA WITH DATA READ FROM 


:RHCS 
BRANCH IF GOOD 
;AFTER SETTING “CLR” BIT #5 


p y m 











DERMRB-SRE TSG) RNCSE-MOE BIT 14 AND RAGSOMREE EW BIT f 









on ;IN_RHCSe TO By THE po 
gest | i TEN ON THE DEVICE 
96S2 MON EVEN” b BOUNDARY THEN 
on Sart (RHCS2 Bat #5) 
ages pias are 

3656 83 SHOULD HA VE 0 

9657 Pt CONTAINED WHAT IS 
9658 ;GIVEN IN BAD RHCS3 

$659 027350 738: 

9660 ;CHECK THAT RHBA Pe 0 

Fa 027350 012737 O00000 001124 Mov #0, SGDDAT ;GET GOOD = 0 

9663 027356 9017737 154502 001126 ‘ MOV - @RHBA, SSDDAT ;READ RHBA FOR COMPARISON 
9664 027364 023737 O011e4 O01126 CMP scobAt, SBDDAT COMPARE EXPECTED 

9665 :DATA WITH DATA READ FROM 







S656 : RHBA 
9657 027372 001401 BEQ 75S ;BRANCH IF GOOD 

$668 027374 104121 ERROR 121 

9659 : ;AFTER SETTING “CLR” BIT #5 
9670 SIN RHCSS TO INIT THE RH 
9671 SONE WORD OF ALL ONES IS 







OULD HAVE O 
9679 ‘BUT CONTAINED WHAT IS 
9680 GIVEN IN BAD RHBA 
9681 027376 753: 
. 9682 ;CHECK THAT RHBAE HAS 0 
9683 027376. 012737 O00000 001124 MOV #0, $GDDAT ;GET GOOD = 0 







9685 027404 017737 154520 001126 MOV DRHBAE,SBDDAT  ;READ te ie COMPARISON 
$686 O274le 023737 O011e4% O011e6 CMP $GDDAT,SBDDAT  ;COMPARE EXP 
9687 DATA WITH BATA READ FROM 







9688 ;RHBA 
9689 27420 O01401 BEQ = 778 ;BRANCH IF GOOD 

9690 Se742e 104122. ERROR 122 

21 AFTER SETTING "CLA" BIT #5 






9702 : GIVEN IN BAD RHBAE 
$703 Se74e4 77$: 
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DERHAB. SRC 


RHCS2-WCE BIT #14 AND RHCS3-WCE eu BIT #11 


012737 000000 o01124 | 


GECLa§ GASES ARIEL BBHIEE 


SETEST a7 RHCSE-WCE BIT 14 AND Riccar Ph eit @ibe 


DHE HE CK DIK CK i IK oe oc Hee 


Se we ee ee ee ae ee ee ee ee ee 


TE it 15 llleeleelelelleleieblieldebieloeeionetoemiiaeiiet 





CHECK THAT RHWC HAS 0 
MOV #0, SGDDAT GET GOOD = 0 


Cee eboRTSEBBBAr © EBSMPAREMEXBEE ERMPARZSON 
;DATA WITH DATA READ FROM 
BEQ 793 ;BRANCH IF GOOD 


ERROR 123 
HIN RACE TO INIT he 1 #5 


Pech N oN. THE cee Te 
NF ne 











; SHOULD HAVE C 
;BUT CONTAINED WHAT IS 
GIVEN IN BAD RHWC 









T 37 RHCS2-WCE BIT #14 AND RHCS3-WCE EW BIT #11 


CLEAR THE SUBSYSTEM BY A dT al CLEAR (RHCS2 BIT #5) 
ay NINE WORD OF ALL NINES ON TO T 
T UP TO DO WRITE CHECK ON THAT WORD FROM AN 


BOUNDAR 
DO A ONE WORD WRITE CHECK WITH RHBA FROM AN 
EVEN WORD BOUNDARY 
THIS ag SET a Fey (RHCS3 BIT #11) 
AND a (RHCS2 
"CLR" (RHCS2 ef is) 13 GIVEN 
ALL ERRORS ARE C 
CHECK RHCS1, RHCSE. RHCS3, RHBA, RHBAE, RHWC 















MOV #STACK, SP sRESET STACK 

MOV #37, d8TSTNM :SAVE TEST NUMBER 

JSR PC, J¥CLDISK ;GIVE RH INITIALIZE 
:SETUP UNIT 


NUBER 
CLEAR RHWC AND FUNCTION BITS IN RHCS1 


: WRITE ONE WORD OF ALL ONES ON THE DEVIC Et 
hoy #-1, WRFROM S INTO W 


ny 12 en Me HOR FORGED CONT REGISTER 


JSR RO, ICOMND ;G0 TO DO COMMAND 
WRIDAT ;WRITE DATA 


sas-tiionesicenipenlsinctiahuanndinibeipnpionnnioummensaiiiditeeaaatised 
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e=21-D 
DERMAS. S&C RHO 3325 BIT #14 OND RHCS3-WCE EW BIT #11 















ySET UP FOR WRITE CHECK 


027522 C5037 093009 ola SUFEW WRITE DATA FOR WRITE CHECK ERROR 

Cerse6 Olav? 776 154326 MOV 8-9. JRHWC i NE WORD FOR WORD COUNT PEGISTER 

GS7ES4 Oler?? Oc3000 154322 MOV sectti JRHBA RITE FROM BUFFER INTO BUS ACORESS 
PROM N Ey EN WORD BOUNDRY 

ease, aS UES. juRITE CHECK ON EVEN word BOUNDA 

927542 OQHOT? iss072 j $SR RO, JCOMND 360 TO 85 “commano 

027546 24150 WRCHE ;WRITE CHECK DATA 


CHECK THAT RHCS2_ HAS WG! ORS TR 





OS7550 012737 049200 901124 dy aCe! ORI TR, SGDDAT GET GOOD = 40300 
637556 963737 005515 O01134 ats UNIT, $GDDAt s INCLUDE "UNIT NUMBER 
QE7SE4 OLT7ST 254300 001126 MOV QRHCS2,$BDDAT  ;READ BHCS2 FOR COMPARISON 
Oa7572. 023737 881124 301136 CMP SGDDAT, SBCDAT : COMPARE EXP 
:DATS WITH BATA READ FROM 
027605 001401 BEQ 65S :BRANCH IF GOOD 
OeT&0e 104114 ERROR 114 
:SETER SETTING “CLR” BIT 8 
:IN RHCS2 TO INI? THE RH 
:ONE WORD OF ALL ONES IS 
WRITTEN ON THE DEVICE 
: WRITE CHECK WAS DONE 
:0N AN EVEN WORD 3OUNDARY THEN 
RHC SHOULD HAVE HCE! OR!IR 
TOGETHER WITH UNIT NUMBER 
'BUT CONTAINED WHAT IS 
GIVEN IN BAD aiicge 
027604 $s¢: 
"Se igHeck THAT RHCS3 HAS DBL!WCEEW 
2030 027604 012737 006000 001:24 sDBL'WCEEW, SGODAT ;GET GOOD = 6000 
| $7393 227612 217737 154214 001126 MOV DRHCS3,$30DAT  ;READ RHCS3 FOR COMPARTSO 
OC 627625 023737 001.24. COl1z6 CMP $GDDAT,S$BODAT  :COMPARE EXP 
S631 :5ATA WITH Sata READ FROM 
902 :RHCS3 
S803 027626 001401 BEQ 67S BRANCH IF GOOD 
| 9854 657636 154115 ERROR 115 
9g55 ;AFTER SETTING “CLR” BIT #5 
3256 tIN RHCS2 TO INIT THE RH 
$607 ‘ONE WORD OF ALL ONES IS 
se ;HRITTEN ON THE DEVICE 
| 9859 WRITE CHECK WAS DONE 
| $610 :0N AN EVEN WORD BOUNDARY THEN 
| S61] . RHCS3 SHOULD HAVE DSL'WCEEW 
SE12 :=600 
| $6i3 !BUT CONTAINED WHAT IS 
| $65 :GIVEN IN BAD RHCS3 
| 38is ce7e22 &7$: 
| 
L 





MAT NUEC“11 -DERHAB=2 
DERHAB. SAC 


. 


027632 


027636 
037 


Bees 


027669 
027862 


027684 


D27564 
027672 


027700 
027706 


N27714 


wees tf 


027716 


027720 


MACYLI 27(732) 
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#14 AND RHCS3-WCE EW BIT all 


JSR PC, aeCLOISk 


SHECK THAT RHCS1 HAS RDY!DVA 
bay BROY!DVA,S$GDDAT ;GET GOOD = 4200 


MOV JRHCS1. SEDDAT 
CMP $GDDAT, $8DDAT 


BEQ 69$ 
ERROR 116 


s CHECK THAT RHCS2 HAS I 


Moy 8IR, $GDDAT 
gis UNIT. $GODAT 


MOV @RHCS2, SBODAT 
CMP -SGDDAT , SBDDAT 


sCHECK THAT RHCS3 HAS O- 





R 
;GET GOOD = 100 









Ie RH Teak 
Eee tie WC WNEE FUNCTION BITS IN RHCS! 


;READ RHCS1 FOR COMPARISON ~ 
:COMPARE EXPECTED % 
:DRT A WITH DATA READ FROM 
BRANCH IF GOOD 


;AFTER SETTING “CLR” SIT #5 
:IN yh? 3 TQ INIT THE RH 


3C RRORS 
AHL SHOULD HAVE ROY! OVA 


‘BUT CONTAINED WHAT IS 
:GIVEN IN BAD RHCS! 


INCLUDE UNIT NUMBER 
sREAD a. ao COMPARISON 
;COMPARE_EXP 
DATA WITH BRYA READ FROM 
BRANCH IF GOOD 


oe. SETTING wrth BIT #5 


iN ¢ CLEAR ( 
CLEAR ALL ERRORS 
sRH nae SHOULD HAVE IR 


TOGETHER WITH UNIT NUMBER 
:BUT CONTAINED WHAT IS 
;GIVEN IN BAD ahicss 


MAINOEC=11-DERHAS-A 
DERHAS. SRC 


027720 


O27? 
Reooas 


027774 
027774 
930092 
030010 


030016 
03020 


T3? 


012737 
017737 
023737 


001491 
104122 


73¢) : 
RHCSS-WCE ‘Bit #14 AND RHCS3-WC 


MACY e7( Ce-SEP-76 15: 


000009 001124 


gga BBLIEE 


lies 


MOV 
MOV 
CMP 


SEQ 
ERROR 


733: 
cocooo 002124 Mov 
154104 001126 MOV 
651124 o01126 CMP 
BEQ 
ERROR 
73S: 
goc000 091124 Moy 
154122 O01126 MOV 
601125 dOlics CMP 
BEQ 
ERROR 


ht PAG 


187 
EW SIT #11 


#0, $GDDAT 


ScObAT: SBDDAT 


73$ 
120 


;CHECK THAT RHBA HAS 0 
#0, $GDDAT 


7 ou 


JRHBA, SBDDAT 


$GDDAT, $8DDAT 


7$$ 
lel 


;CHECK THAT RHBAE HAS 0 
#0, $GDDAT . 


JRHBAE , SEDDAT 
$GDDAT, $8DDAT 


77$ 
lee 





;GET GOOD = 

; REA $3 F RISON 
Ree BRUCE 3 m _e So 
OAT A ain BTA READ FROM 
*RHCS 

: BRANCH IF GOOD 

Had SETTING “CLR” BIT #5 


A WRITE CHECK WAS DONE 
‘ON AN EVEN WORD ea THEN 
SAN RH CLEAR (RHCS2 BIT #5) 
;WAS GIVEN THIS SHOULD 

;CLEAR ALL ERRORS 
;RHCS3 SHOULD HAVE 0 
;8UT_ CONTAINED WHAT IS 
GIVEN IN BRD RHCS3 
;GET GOOD = 0 

;READ RHBA FOR COMPARISON 
;COMPARE EXPECTED 

RT WITH DATA READ FROM 
BRANCH IF GOOD 


sAFTER SETTING 7gtRe BIT aS 
; IN RH HCSe T0 INIT ; 


OF 
HARLTTEN ON THE DEVICE 
WRITE CHECK WAS DONE 
:0N AN EVEN. we BOUNDARY _THEN 
HCSe BIT #5) 


:S1VEN IN BAD RHBA 


;GET go00 =0 

;READ a 5 aN COMPARISON 
COMPARE EXP 

sDATR WITH BATA READ FROM 
;BRANCH IF GOOD 


;AFTER SETTING TY aera a5 


WRITTEN ON THE DEVICE 
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DERHAB. SRC 137? - RHCS2-WCE BIT #14 AND RHCS9-WCE EW BIT #11 








3A 7 CHECK WAS DONE 






iat aN EV Fh WORD nee ors) THEN 
aga ‘ iis “arveh has S Srout 
9932 OLE 
da33 BES EoRTA ae PAT. Is 
aaec RYT Ef IN ay RHBAE 
$936 030022 773: 
9937 *CHECK THAT RHWC hs 0 
3338 030022 012737 op0009 901124 Mov #0, $GDDAT ;GET GOOD = 0 
99840 030932 O17737 154026 901126 MOV JRHWC,SBDDAT  §;READ RHWC FOR EOMPARISON 
994: 630036 623737 901104 601126 CMP $GDDAT, SBDDAT ; COMPARE EXP 
axe sDATA WITH Basa READ FROM 
9944 o30044 001401 BE 793 BRANCH IF GOOD 
9945 930046 194123 ERROR 123 
9946 ;AFTER SETTING “CLR” BIT 25 
tIN RHCS2 TO INIT THE RH 
94a !ONE WORD OF ALL ONES IS 
3945 sWRITTEN ON THE DEVICE 
9gsc *A WRITE CHECK WAS 
995 :ON AN EVEN WORD BOUNDARY THEN 
gece :AN RH CLEAR (RHCS2 BIT #5) 
$953 WAS GIVEN THIS SHOUL 
3954 :CLEAR ALL 
3955 :RHWC SHOULD i 
$ssé “BUT CONTAINED WHAT IS 
9957 :GIVEN IN BAD RHWC 
aség 20050 738 
§959 
3660 
ee 
8363 : iteet WO TEST DBL (RHCES BIT Bid) TesT' aS 
$364 ; TES TEST DBL (RHCS3 BIT #10) TEST A 
ee ~] 
gscé :# CLEAR THE SUBSYSTEN BY A CONTROLLER CLEAR (RHCS2 BIT #5) 
9967 # SET UP FOR NINE WORD WRITE FROM AN EVEN WORD BOUNDARY 
SSEe 1% DO A NINE WORD W WRITE FR on AN EVEN WORD BOUNDARY 
9sE5 i$ THIS SHOULD NOT SET RHCS3 BIT #10 DBL 
9970 i CHECK RHCS3 
3371  # CHECK RHCS1,RHCS2, RHBA, RHBAE, RHWC 
$973 ee RRM ee en rr ee 
aape paones 1270 Cc tBT40: ay #STACK RESET STACK 
228 Rapbee cer feat oo4ess MOV #40, Sterne ETE reef NUMBER 
$978 020064 004737 O40212 JSR PC, J#CLDISK ;GIVE RH INITIALIZE 
9979 :SETUP UNIT NUBER 
2380 CLEAR RHWC AND FUNCTION BITS IN RHCS1 
agge :SET UP FOR A NINE WORD WRITE FROM AN EVEN WORD BOUNDARY 


9983 930070 O12701 000003 hoy #3,R1 ;COUNT OF THREE 
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| MAINDEC-11-DERHAS-A 
DERHAB. SRC T40 TEST DBL (RHCS3 BIT #10) TEST A 


9984 920074 O12702 903000 MOV #BFEVEN, R2 TART THREE “WORD BUFFER 
938s ; VEN WORD BOUNDAR 
9395 030100 O12722 os2s25 18: MOV #52525, (R2)+ SHOVE THREE S2S2S5 INTO BUFFER 
9987 930104 905301 DEC Ri 
9988 930106 00137 BNE 1§ BR AN MF IF THREE NOT DONE 
$989 630110 612777 903000 153746 MOV #BFEVEN,ORHBA  :SET BUS ADDRESS TO START 
3939 “pane z ‘FROM AN EVEN WORD BOUNDARY 
999] 030116 O12e777? 177767 153736 MOV #-9. DRHWC ;WORD COUNT NIN 
3332 ga01e4 004077 154510 JSR. RO, aCOMND :G0 19 pg COMMAND 

| e333 Oisc SO4iss WRIDAT !WRITE DAT 
9896 “CHECK THAT RHCS3 HAS 0 


99S” 030132 Ole737 000000 001124 Mov #0, SGDDAT - ;GET GOOD = 0. 


9999 030140 017737 153766 001126 MOV DRHCS3,SBDDAT ;READ nage oo COMPARISON 

10000 O30146 Oe3737 O011e4 001126 CMP SGDDAT,$SDDAT  ;COMPARE EXP 

10001 “ae :DATA WITH SAYA READ FROM 

10002 sRHCS 

10003 030154 001401 BEQ 65$ ;BRANCH IF GOOD 

19004 O30156 104124 , ERROR 124 

18005 . ;AFTER SETTING “CLR” BIT #5 
IN TQ INIT i % oo 


07 FRO 
10008 EVEN WORD SOUNDARY Was BONE 
10009 j THEN 

10010 RHCS3 SHOULD HAVE 0 

10011 :SUT CONTAINED WHAT IS 
10012 i. . -GIVEN IN BAD RHCS3 

10913 ‘030160 5 ; 6S$: 

10014 O30160 o42777 oOD0076 153672 BIC 876, JRHCS! 5 CLEAR FUNCTION BITS 

19015 “CHECK THAT’ RHCS1 HAS R ROY! OVA 

10016 030166 012737 oO4200 o01124 Mov #RDY!'DVA,SGODAT ;GET GOOD = 4200 

10018 0630174 017737 153660 001126 MOV JRHCS1,$BDDAT  ;READ RHCS1 of OR COMPARISON 
10018 930202 023737 001124 001126 CMP.  §$GDDAT;SBDDAT  :COMPARE EXP 

ig3e0 5 :0A TA WITH Bata READ FROM 
10522 020210 001401 BEQ 67$ BRANCH IF GOOD’ 

10023 0320212 104125 ERROR 125 

100 sOFTER SETTING "CLR" BIT #5 
10025 ?IN RHCSe TO INIT. TH RH 
10026 ?A NINE WORD WRITE FRO 

igge? Pie, svEN WORD BOUNDARY fies BONE 
10929 , ;RHCS1 SHOULD HAVE RDY!DVA 
10030 =420 

10031 But CONTAINED WHAT IS 


10032 :GIVEN IN BAD RHCS! 

19033 030214 67$: 

10034 ; CHECK THAT RHCS2_HAS IR 

10035 030214 012737 000100 001124 HOV ss BIR, SGDDAT ;GET GOOD = 100 

tek, O30ee2 053737 005010 001124 BIS UNIT. $GDDAT INCLUDE UNIT NUMBER 

10038 030230 017737 153634 001126 MOV © @RHCS2,SBDDAT  ;READ RHCS2 FOR COMPARISON 
10039 030236 023737 OO0lle4% OO0ileb CMP - SGDDAT, SBDDAT  ;COMPARE EXPECTED 













SHEE 


030250 
030250 
030256 
030264 


030272 
030274 


030276 


030276 
030300 
030304 


030312 


=SEP-76 15:11 PAGE 190 


MACY 
T40 TEST T #10) TEST A 





;DATA WITH DATA READ FROM 
Rd 
;BRANCH IF GOOD 


sAFTER SETTING “CLR” SIT #5 
N RHCSe TO INIT THE RH 

a NNINE WORD WRITE FROM AN 

SEVEN WORD BOUNDARY WAS DONE 


; THEN 
sRUCS2 SHOULD HAVE IR 
TOGETHER WITH UNIT NUMBER 


BUT CONTAINED WHAT IS 
GIVEN IN BAD RHCS2 






Baise FRRor 28 












69S: 
:CHECK THAT RHWC HAS 0 

012737 900000 001124 MOV #0, SGDDAT :GET GOOD = 0 

017737 153600 001126 MOV JRHWC,SBODAT READ RHWC FOR 1 GNPARISON 

023737 601124 o01126 CMP - §GDDAT,SBDDAT :COMPARE EXP 






;DATA WITH DATA READ FROM 
t BRANCH IF GOOD 


; AFTER a6 TTING “CLR” a 8S 
sIN migse TQ: HE R 

WORD WRITE FROM "aN 
Even HiORD BOUNDARY WAS DONE 


;RHWC SHOULD HAVE 0 
BUT CONTAINED WHAT IS 
:GIVEN IN BAD RHW WC 






401 BEQ 71$ 
131 ERROR 131 









718: 





LRASAAAEAUAESEOSORSSESEAUSSSESERESOSELEOHEOESHIGREIEIDEREOREEEDS 
T 41 TEST DBL (RHCS3 BIT #10) TEST B 


‘ETE 
;# CLEAR THE SUBSYSTEM BY A SoTL LEN CLEAR (RHCS2 BIT #5) 
:# SET UP FOR A TEN WORD WRITE FROM AN EVEN WORD BOUNDARY 
;# DO _A TEN WOR RO WRITE FROM_AN EVEN WORD BOUNDARY 
3; THIS rae SET RHCS3 BIT #10 D 

;# CHECK RHCS3 
:#* CHECK RHCS1,RHCS2, RHBA, RHBAE , RHWC 


Cele Gre HRRAEX 
COPE 


000004 +éTy]. | 
012706 001000 nov #STAC sRESET STACK ri 
#41, SateTNn :SAVE TEST NUMBER fi} 


012737 OCOO41 OO46S6 MOV oH ° 
004737 O4031e JSR PC, d#CLDISK ;GIVE RH INITIALIZE bal 
;SETUP UNIT NUBER 
;CLEAR RHWC AND FUNCTION BITS IN RHCS! 


;SET UP FOR A TEN WORD WRITE FROM AN EVEN WORD BOUNDARY 










pay 44 
—-O 
O00 PUT-E Chu ODD SOULE Goro epeD 


= + bb 2 0 = 8 8 0 = 8 = 0 8 0 8 0 0 8 - 8 8 = 8 <8 = 0 bb 0 9-2 = 0 8 8 0 0 bo bo be oh 9 pe pe 


DNVOVOVOVOOOVOVVOVOOOO OOO VO VOVOVOVOVHOVOVOVVOVDBOVVOKOVDVVOOVOVNOHBVOOROH000 
0 0s Ob 0 es he ee 0 es Be be be Bb bs bb be 9s bo ho 


OOS NPE Wid ODD VOTE oO COD SOMONE CorUr eo 


apae8 


030344 
030352 
030356 


030360 
033366 
030374 


030402 
030404 


030406 
030405 


030414 
O3042e 
030430 


030426 
030440 


030442 


C3044e 
030450 


RAINS <1) -UERHAGES 
DERHAB . SRC T4l 


boa? O80828 


Bi87b2 


012737 
017737 
023737 


001401 
104124 


042777 
012737 
017737 
023737 


001401 
104125 


012737 
053737 


MACY 
TEST 


po8000 


052525 


003000 


177766 
1S4262 


002000 


153540 
001124 


000076 
004200 


153432 
001124 


000100 
005010 





2) 


ei’ esa 6 


153520 
153510 


001124 


001126 
001126 


1S3444 
001124 


001126 
001126 


001124 
001124 








fr tio)” 43}! PAGE 191 
T #10) TEST 


43 RI Bi F THRE 

MOV HBFEVEN, Re TART HEE WORD BUFFER 
AN EVEN WORD BOUNDAR 

MOV #52525, (R2)+ nove THREE 5252S INTO BUFFER 
Ri : COUNT 


BNE 1$ BRANCH IF THREE NOT DONE 
MOV #BFEVEN, JRHBA :8ET BUS ADDRESS TO STAR 

OM RN EVEN WORD BOUNDARY 
MOV #-10,.aRHWC :WORD COUNT TE 


JSR RO, JCOMND ; GO 6 "Dg, COMMAND 
WRIDAT ‘WRITE DAT 


-CHECK THAT RHCS3 HAS DBL 
hov #DBL, $GDDAT ;GET GOOD = 2000 


MOV QRHCS3,SBDDAT ;READ RHCS3 FOR COMPARISON 
CMP $GDDAT,$BDDAT  ;COMPARE EXPECTED 
;DATA WITH DATA READ FROM 


: RHC 
65$ BRANCH IF GOOD 


BEQ 
ERROR 124 
;AFTER SETTING “CLR” BIT #5 
:IN_RHCS2 TO INIT THE +? 
A TEN WORD WRITE FROM 
;EVEN WORD BOUNDARY WAS ONE 


:RHCSS SHOULD HAVE DBL 


BUT CONTAINED WHAT IS 
GIVEN IN BAD RHCS3 


BIC #76, JRHCS1 -CLEAR FUNCTION BITS 
-CHECK THAT’ RHCS1 HAS R ROY! DVA 
Mov #RDY!DVA,SGDDAT ;GET GOOD = 4200 


MOV QRHCS1,$B8DDAT ;READ RHCS1 oe COMPARISON 
CMP $GDDAT;$BDDAT  ;COMPARE EXP 
DATA WITH BATA READ FROM 


:RHCS 
67$ BRANCH IF GOOD 


BEQ 
ERROR 125 
AFTER SETTING “CLR” BIT 8S | 
tIN RHCS2 TO INIT THE RH 
tA TEN WORD WRITE FROM 
SEVEN WORD BOUNDARY HAS DONE 


;RHCSI SHOULD HAVE RDY!DVA 


‘BUT CONTAINED WHAT IS 
GIVEN IN BAD RHCS! 


» CHECK THAT RHCS2 HAS IR 
MOV #IR, SGDDAT :GET GOOD = 100 
BIS UNIT. $GDDAT : INCLUDE UNIT NUMBER 



















13183 





YOOKVOVOVOOOVOVWVHIOOIVOOOVOOHKVOVKOOOVVOOVDVDVDOOVOHWHOVOVOOKO0O000 
ee bh ee i 0 be bb 0 be 0 bb oe ee 
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020456 
O3O464 


30472 
30474 


039476 
030476 


030504 
030512 


030520 


0305¢2 


030524 


030524 
030526 
030532 


030540 





017737 
023737 


001491 
104126 


012737 
017737 
023737 


001401 
104131 


000004 
012706 
012737 


004737 
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TEST DBL (RHCS3 BIT #10) TEST B 


153406 O011e6 MOV @RHCS2,SBDDAT  ;READ ee pete COMPARISON 
001124 001126 CMP SGDDAT,;$BDDAT  ;COMPARE EXP 
DATA WITH BATA. READ FROM 
;RHCS2 
BEQ 69$ BRANCH IF GOOD 
ERROR 126 


;AFTER SETTING “CLR” a aS 
sIN_RHCS2 TO INIT THE R 

3A TEN WORD WRITE FROM A 

EVEN WORD BOUNDARY WAS DONE 


RHCS2 SHOULD HAVE IR 
STOGETHER WITH mt + arom 


BUT CONTAINED W 
GIVEN IN BAD Rucs2 


69$: 
sCHECK THAT RHUC_HAS 0 
poco00 901124 HOV #0, SGDDAT ;GET GOOD = 0 
153352 001126 NOV  GRAWC, SBDDAT_ READ. RWC FOR COMPARISON 
001124 O01l26 CMP S$GDDAt,SBDDAT © :COMPARE EXP 
Dara ETH DATA READ FROM 
BEQ. 715 !BRANCH IF GOOD 
ERROR. 131 
. AFTER SETTING "CLR" BIT #5 
HIN RHCS2 10 INIT THE RH 
WORD WRITE F 
ven WORD BOUNDARY WAS” DONE. 
?RHWC SHOULD HAVE 0 
:BUT CONTAINED WHAT 1S 
A :GIVEN IN BAD RHWC ¢ . 


meg oe tne ot lee ecapemannte: 
T 42 TEST DBL (RHCS3 BIT #10) TEST C 


eT 

* aor. THE ye BY A CONTROLLER CLEAR (RHCS2 BIT #5) 
* SET FOR A Ms wre WRITE FROM AN RU WORD BOUNDARY 

+ DO A WEN WORD WRITE FROM AN ODD WORD BOUNDARY 

# THIS SHOULD NOT SET RHCS3 BIT #10 DBL 

* CHECK RHCS3 

* CHECK RHCS1,RHCS2, RHBA, RHBAE , RHWC 


ee RR ee 
001000 M #STACK, SP ;RESET STACK 
ooo042 o04656 MOV #42, a8 TSTNM :SAVE TEST NUMBER 
040312 ISR PC, JHCLDISK ;GIVE RH INITIALIZE 


;SETUP UNIT NUBE 
CLEAR RHWC AND FUNCTION BITS IN RHCS1 
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DERHAB. SRC T42 —«* TEST OBL (RHCS3 BIT #10) TEST C 


;SET UP 4 A TEN WORD weiTe dy on Q00 WORD BOUNDARY 
012701 000003 OV R UNT 0 REE. 


012702 003002 #3 00D, R2 Ae ars WORD BUFFER 
WORD BOUNDARY 

O12722 o52525 : #52525, (R2)+ THREE S2S25 INTO BUFFER 
005301 Ri COUN 
001374 1$ COUNT IF THREE NOT DONE 
012777 003002 153272 #BFODD,9RHBA § ;SET BUS ADDRESS TO START 

: FROM aN ODD WORD BOUNDARY 
012777 177766 153262 MOV #-10.,dRHWC ;WORD COUNT TE 
904077 154034 JSR RO, JCOMND 1 5 *Do COMMAND 
004154 WRIDAT WRITE DATA 


--0—- 
forore 
-O 

ODw 


RataiaiSittesaatars 
CR Seon 


;CHECK THAT aoe HAS 0 
Ole737 900000 001124 MOV #0, SGODAT ;GET GOOD = 0 


017737 153312 O01126 MOV ORHCS3,$B80DAT  ;READ RHCS3 FOR COMPARISON 
030622 023737 OO1le4 OO01le6 CMP $GDDAT,SSDDAT  ;COMPARE EXPECTE 
sDATA WITH DATA READ FROM 


RHC 
030630 901401 BEQ 65$ BRANCH IF GOOD 
030632 104124 ERROR 124 
4A SETTING “CLR” BIT #5 


HCS2 TO INIT THE RH 
jay TEN WORD WRITE FROM AN 
Pe WORD BOUNDARY WAS DONE 


N 
;RHCS3 SHOULD HAVE 0 
;BUT CONTAINED WHAT IS 
0634 GIVEN IN BAD RHCS3 


03 : : 

030634 042777 000078 153216 BIC #76, 0RHCS1 pCLERR FUNCTION BITS 
“CHECK THAT RHCS1 HAS RDY!DVA 

030642 012737 oO4200 001124 Hoy #RDY!DVA, SGDDAT : GET GOOD = 4200 


030850 017737 153204 001126 MOV @RHCS1,S8DDAT  ;READ RHCS1 oe COMPARISON 
030656 023737 O01124% O011e6 CMP $GDDAT, SBDDAT ; CONPARE EXPECT 
;DAT A WITH DATA READ FROM 


HCS1 
030664 091401 BEQ 67$ t BRANCH IF GOOD 


O30666 104125 ERROR 125 
iON RH SETTING “CLR” ait aS 
N_RHCSe TO INIT THE R 
TEN WORD WRITE FROM aN 
in WORD BOUNDARY WAS DONE 


; THEN 
et SHOULD HAVE RDY!DVA 


;BUT CONTAINED WHAT IS 
;GIVEN IN BAD RHCS1 


030670 
;CHECK THAT RHCS2 HAS IR 


030670 012737 000100 001124 HOV #IR, SGODAT ;GET GOOD = 100 
030676 053737 905010 001124 BIS UNIT, SGDDAT ; INCLUDE UNIT NUMBER 
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DERHAB. SRC T4#2 TEST DBL (RHCS3 BIT #10) TEST C 


030704 017737 MOV JRHCS2,SBDDAT READ RHCS2 FOR COMPARISON 
712 CMP  $GDDAT;SBDDAT_; EXPECT 
:OATA WITH DATA READ FROM 


sRHCS2 
pare o BEQ 69$ ;BRANCH IF GOOD 


0722 ERROR 126 
;AFTER SETTING “CLR” BIT 
Se _T T THE RH 
ITE FROM AN 
3000 WORD BOUNDARY WAS DONE 


jRHCS2 SHOULD HAVE IR 


TOGETHER WITH UNIT NUMBER 
a CONTAINED WHAT IS 
GIVEN IN BAD RHCS2 


69$: 
: CHECK THAT ste HAS 0 
012737 oo0000 001124 Mov #0, SGDDAT ;GET GOOD = 0 


017737 153124 001126 MOV ARHWC , SBDDAT ;READ RHWC FOR COMPARISON 


023737 O011e% 001126 CMP $GDDAT,$BDDAT  ;COMPARE EXPECTED 
;DATA WITH DATA READ FROM 


:RHWC 
001401 BEQ 71$ :BRANCH IF GOOD 


104131 131 
;AFTER SETTING “CLR” BIT #5 
;IN_RHCS2 TO INIT THE RH 
3A TEN WORD WRITE FROM AN 
i WORD BOUNDARY WAS DONE 


( SHOULD HAVE 0 
Bur CONTAINED WHAT IS 
GIVEN IN BAD RHWC 


030752 718: 


5 EEK EKER EEE EEE EEE EE RAK EH AE KEE KAKA EKER EERE REE R ERE RRR EARS 
TEST 43 TEST DBL (RHCS3 BIT #10) TEST D 


CLEAR THE SUBSYSTEM BY A CONTROLLER CLEAR (RHCS2 BIT #5) 
SET at FOR A ELEVEN WORD WRITE FROM AN EVEN WORD BOUNDARY 
* DOA ELEVEN WORD WRITE FROM AN EVEN WORD BOUNDARY 
HSH res NOT SET RHCS3 BIT #10 DBL 
CHECK RHCS1,RHCS2, RHBA, RHBAE , RHWC 

"Py aa page aeaanamaeegor ey 


+8743 
001000 MOV #STACK RESET STACK 
030760 012737 GO0043 OO4eSE MOV #43, CATeTNM :SAVE TEST NUMBER 


030766 004737 040312 JSR PC, d#CLOISK ;GIVE RH INITIALIZE 
:SETUP UNIT NUBER 
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DERHAB. SRC T43 TEST DBL (RHCS3 BIT #10) TE 

19320 ie CLEAR RHWC AND FUNCTION BITS IN RHCS1 
18364 ;SET UP FOR A ELEVEN WORD WRITE FROM AN EVEN WORD BOUNDARY 
10323 030772 012701 900003 MOV #3,R1 : COUNT oF THREE 

1O3e8 030776 Ole7De 003000 MOV SEtEVEN, R2 s START HREE WORD BUFFER ; 

10325 FROM AN EVEli WORD BOUNDAR 

10326 031002 Ole722 oS5e525 1S: MOV #52525, (R2)+ ; MOVE THREE S2S25 INTO BUFFER 
10327 931006 905301 DEC Rl :C 

10368 1919 134 BNE tg ‘BRANCH IF THREE NOT DONE 

1 idle 912777 003000 153044 MOV #BFEVEN,QRHBA :SET BUS ADDRESS TO START 

10330 *FROM AN EVEN WORD BOUNDARY 

C33 1020 912777 177765 153034 MOV #-11.,SRHWC ;WORD count T ELEVEN 

i 1025 °004077 153606 JSR RO, ICOMND COMMAND 

10333 931032. 004154 WRIDAT ‘fk TE DATA 


10336 ;CHECK THAT woot HAS 0 

1h 031034 012737 0009000 001124 MOV #0, $GDDAT ;GET GOOD = 0 

1 333 in B17 baits) 001126 MOV MRHCS3,$BDDAT  ;READ RHCS3 FOR COMPARISON 
10340 105 3737 11e4 O011e6 CMP $GDDAT,$BDDAT  ;COMPARE EXPECTED 

10341 ;DATA WITH DATA READ FROM 


10342 HC 

10343 031056 001401 BEQ 65S EBRANCH IF GOOD 

10344 O31060 104124 ERROR 124 

10345 AFTER SETTING "CLR" a1 #5 


10347 
10348 EVEN WORD BOUNDARY WAS DONE ; 
10349 :T N ; 
10350 *RHCS3 SHOULD HAVE 0 ‘ 
19351 ‘BUT CONTAINED WHAT IS “a 
1 -GIVEN IN BAD RHCS3 

10353 031062 S$: 

10354 O3!082 o42777 O00076 152770 BIC #76, JRHCS1 5CLEAR FUNCTION BITS 

10355 “CHECK THAT RHCS1 HAS RDY!DVA 

103568 031070 012737 oOO4200 cO1124 MOV #RDY!DVA,SGDDAT ;GET GOOD = 4200 


10358 031076 017737 152756 001126 MOV @RHCS1,S8DDAT  ;READ RHCS1 FOR COMPARISON 
10359 031104 023737 OOl1e4% OOlleb CMP S$GDDAT,SSDDAT  ;COMPARE EXPECTED 
10360 ;DATA WITH DATA READ FROM 


10362 O31112 001401 BEQ 67S BRANCH IF GOOD 

10363 031114 104125 ERROR 125 

10364 ;AFTER SETTING “CLR” BIT #5 
10365 IN RHCSe TO INIT THE RH 
10366 3A ELEVEN WORD WRITE FROM AN 
10367 ;EVEN WORD BOUNDARY WAS DONE 


10369 | :RHCSI SHOULD HAVE RDY!DVA 


1037 =42 

19371 ‘BUT CONTAINED WHAT IS 
10372 GIVEN IN BAD RHCS1 
10373 031116 67$: 

10374 ;CHECK THAT RHCS2 HAS IR 


10375 031116 012737 9000100 001124 Mov #IR, SGODAT ;GET GOOD = 100 


MAINDEC-11-DERHAB-A 
DERHAB. SRC i 


one 


BeBe 


GBusaes 
ites} 


NRL 


03737 
017737 
023737 


001401 
104126 


031152 
031152 
031160 
031166 


012737 


017737 
023737 


031174 001401 
031176 104131 


031206 


031200 000004 


O3le0e 012706 
031206 012737 
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TEST DBL (RHCS3 BIT #10) TE 


005010 9001124 


1$2732 001126 
O0ile4 001126 


o00000 001124 


152676 001126 
051124 001126 


001000 
000044 OO4ESE 
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Bis 


MOV 
CMP 


UNIT, SGODAT ; INCLUDE UNIT NUMBER 
JRHCS2,SBDDAT  ;READ RHCSe FOR COMPARISON 
_$GDDAT;SBDDAT  ;COMPARE EXPECTED 
;DATA_WITH DATA READ FROM 


one IF GOOD 


ih TTING “CLR” BIT #5 
CSe TO INI 

iO ELEVEN 

; THE 


THE RH 
LEVEN WORD WRITE 
BOUNDARY WAS DONE 
ine SHOULD HAVE IR 
sTOGETHER WITH UNIT NUMBER 
;BUT CONTAINED WHAT IS 
:GIVEN IN BAD RHCS2 


950 sé 9S 
ERROR 126 


69S: 
“CHECK THAT RHWC HAS 0 
Mov #0, SGDDAT ;GET GOOD = 0 


MOV JRHWC , SBDDAT ; READ RHWC FOR COMPARISON 
CMP $GDDAT,$BDDAT  :COMPARE EXPECTED 

mae WITH DATA READ FROM 
715 :BRANCH IF GOOD 


131 
7 ee SETTING “CLR” BIT #5 
NIT THE RH 


;RHWC SHOULD HAVE 0 
;BUT CONTAINED WHAT IS 
718 GIVEN IN BAD RHIC 


5 EERE KAA K KEKE KEKE EERE AER AK ER ERRE ARE E AA EERE EERE AE REAR EERE R EES 
EST 44 TEST DBL (RHCS3 BIT #10) TESTE 


CLEAR Me seeysten BY A CONTROLLER CLEAR (RHCS2 BIT #5) 
T UP WORD g tts Pan AN EVEN WORD BOUNDARY 


Nese 
0 A TEN WORD WRITE FROM AN EVEN WORD BOUNDARY 
THIS SHO NOT SET RHCS3 BIT #10 DBL 
CHECK RHCS 
CHECK RHCS1,RHCS2, RHBA, RHBAE , RHWC 


MK DK IK DIK 2K Di Dik “wees 
~4 


. or ee ee 


+8744 
MOV STACK, SP RESET STACK 
MOV #44, a8 TSTNM :SAVE TEST NUMBER 
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DERHAB. SRC T4H4 TEST DBL (RHCS3 BIT #10) TESTE 


10432 021214 004737 O40312 JSR PC, J#CLDISK ;GIVE RH INITIALIZE 


1ba33 SE TUE Bhne ANB FUNCTION BITS IN RHCS1 








10435 
1 -SET UP FOR A TEN WORD WRITE FROM AN EVEN WORD BOUNDARY 
1ba3s 031220 012701 900003 Mov #3,R1 sCOUNT OF IT E 
10438 O31224 Ole702 003000 NOV SaFEVEN, Re : STAR E WORD BUFF ER 
1 33 3 PRON a N EVEN WORD BO 
1044 1230 012722. oSese5 13: MOV wS2525,(R2)+  :MOVE THREE S2S25 INTO OEtER 
1044] 031234 90530! DEC RI COUNT 
10442 031236 001374 BNE 13 ‘BRANCH IF THREE NOT DONE 
10443 031240 912777 003000 1526i6 MOV WSFEVEN,JRHBA SET BUS FODRESE TO START ; 
1O444 FROM AN EVEN WORD BOUNDARY 
10445 031246 012777.. 177766 152606 MOV # JRHWC sHORD count TEN : 
10446 031254 052777 O00010 152606 BIS #SAI,aRHC ac}°: <7 Bar'y 
10447 O3leb2 004077 153352 SSR Ae aconND G0 TO DO COMMAND 
48 031266 OO4154 WRIDAT ‘WRITE DATA 
10450 
10451 -CHECK THAT RCS HAS 0 
10482 031270 012737 00000 001124 MOV #0, SGDDAT GET GOOD = 0 
10454 031276 017737 152630 001126 MOV JRHCS3,$BDDAT  ;READ RHCS3 FOR COMPARISON 
10455 031304 023727 001124 OOlle6 CMP $GDDAT, $BDDAT ; CONPARE EXPECTED 
10456 DATA WITH DATA READ FROM 
10457 ‘ :RHCS3 
0458 031312 001401 BEQ GES ‘BRANCH IF GOOD 
10459 031314 104124 ERROR 124 
10460 ne AFTER SETTING CLR" BIT #5 
10461 IN RHCS2 TO INIT THE RH 
10462 } tA TEN WORD WRITE FROM AN 
19463 “EVEN WORD BOUNDARY WAS DONE 
10464 : “WITH BAI IN RHCS2 ‘SET 
10465 ; THEN 
10466 *RHCS3 SHOULD HAVE 0 
10467 ‘BUT CONTAINED WHAT IS 
10468 GIVEN IN BAD RHCS3 
10469 031316 65S: 
10470 031316 042777 OCO0076 152534 BIC #876, JRHCS1 -CLEAR FUNCTION BITS 
10471 “CHECK THAT RHCS1 HAS RDY!DVA 
19472 031324 012737 o04200 001124 MOV #RDY!DVA,SGDDAT ;GET *s000 = 4200 
10474 031332 017737 152522 001126 MOV JRHCS1,$BDDAT  ;READ RHCS1 FOR COMPARISON 
10475 O31340 023737 001124 OOlle6 CMP SGDDAT’S$BDDAT  :COMPARE EXPECTED 
10476 ;DATA WITH DATA READ FROM 
10477 HCS1 
10478 031346 O01401 | BEG 67S TBRANCH IF GOOD 
10478 031350 104125 | ERROR 125 
194280 ;AFTER SETTING “CLR” BIT #5 
10481 tIN RHCS2 TO aut THE Ri 
10482 tA TEN WORD WRITE FROM 
10483 sEVEN WORD BOUNDARY WAS ABONE 
10484 “WITH BAI IN RHCS2 SET 

| Lugs : THEN 

| 10486 RHCS1 SHOULD HAVE ROY!DVA 

| 6497 :s4200 





B16 
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DERHAS. SRC ray TEST OBL (RHCS3 BIT #10) TEST E 
10488 SUT CONTAINED WHAT IS 
10483 ‘ -OlvEN IN GAD RHCS! 
15480 031382 STs: : 
143) + CHECK THAT 1 BHoSe nas was oRtBRE “ e 
164G2 931252 012737 009119 002124 Ady SHE) GOOD s 19 
13433 031360 beara? Oos0i2 «Soliss ers Santegadear ffacc Zee art honces 
1049S O32366 OL773? 18247 001126 MOV DRHCS2,$80DRT  ;READ SCL 2 FOR coMPaerooN 
13438 B31374 O2373? OO11e4 061126 CMP SGODAT $80087 ic oMPaRE EMPECTEC 
Css) ; somos wl Pe om ss SEeL Fel” 
15448 :Re" 52 
15488 931492 20.401 SEQ £33 :BRANCH IF GOOD 
10550 031434 12412 ERROR Zé Sai 
10501 SAF TER SETTING “CLE” 327 85 . 
10592 :IN SHC5Z TC INIT “HE Se 
10553 ta TEN WoRs wer FROM al 
15504 TEVEN WORD BOUNDARY ast DONE 
1058s WITH Dal IM AeCSe SET 
10595 ; THEN 
10507 :RHiS2 SHOLLD HAVE IB!SAI 
1050s tsi 16 
1568s TOGETHER WITH UNIT NUMSES 
10510 :BUT CONTAINED SaRT IS 
1OSi1 : -GIVEN IN BAD SHCSS 
10512 031406 £93: 
105i3 pSHEC K THOT RHWC was Oo 
10514 931406 012737 C0000 coN1e4 Ov a0, SGDDAT ;GET GOOD = 0 
1051S 031414 017737 182442 O01126 MOY DRHWC,SSDDAT ;READ RHWC FUR COMPARISON 
105!7 O31422 535536 Sdire4 oO0:126 CMP $GDDAT. SEDDAT : SOME ARE EXPECTED 
irei8 :DAT Me A WITH DATe READ FROM 
19520 921430 001401 REQ 71$ 'BRANCH IF GOOD 
15521 031432 [54131 ERROR 131 
1oSz2 sAFTER SETTING souR" rT ss 
10523 SIN RHC 52 TO INIT THE & 
10524 TEN WORD WRITE FROM 
1053 SEVEN WARE BOUNDARY cass None 
1056 WIT4 SAI IN RHCS2 SET 
10527 HE? 
10522 'RHlc SHOULD HAVE 0 
19525 :BUT CONTAINED WHAT IS 
10520 :GIVEN IN BAD RHC 
‘0531 O31434 718: 
35 
3 


; REALE EFRARRREREREERELEPD EAA A RAPA ERAELE RATER ELERAARAEEES EEREELEE 
EST 45 TEST OBL (RHCS3 BIT #10) TEST F 


+ 

* CLEAR THE SUBSYSTEM BY A CONTROLLER CLEAR (RHCS2 BIT #5) 
2 ae vA ak A ELEVEN WORD WRITE FROM AN ODD WORD SOUNDARY 
. WORD WRITE FROM AN 50D WORD BOUNDARY 

* Ths Sab HLED SET RHCS3 BIT #10 DSL 

. 

- 


CHECK Bnet, RHCS2, RHB9, RHBAE , RHWC 


Fir eM ATALAI ALATA TA) 
ite ret AS 


0M WONOUE 


eee et ed ed ee ee oe ee 
COmoiIonionoow 
CONOR COON OOOrant 


ae ce eS 
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ize 


Mithitatntntate, 


OUD DUNE Cte Cbd 


© 
uy 


031454 
032485 


pales 


AU 
«cs 
oc 
Lr) 


~* &-+ > -< b+ &-* b-< 9 © b= bo f+ & = Ho 
€ 
o 
~ 
QoQ 
w 
- 
£ 
“I 
+s 


10563 931502 
10564 mien 
032514 


uw 


031516 


~ 


ARRIRIRRRRERRR 
Jat tun chit’ 


“J 
6000 


i0S86 031544 
19587 O31544 


88 
10589 931552 


0315€0 
O31S66 


SRR 


DID NRUT Ee wore 


031574 
62157 


weow! 


% 
eet eee et et ee et - 


OodooOOoND 


Cau 


* 
- 


SRS eae GE 


atte 
Ole73? 
004737 


05301 


RRO SeRc ow 
- 
(J) 
“ 
£ 


oor 
om 5 
rey 
uw 
BS 


os 
104124 


042777 
012737 


017737 
023737 
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TEST OSL. (RHES3 SIT #10) red? 


001900 
OfOO4S 


040312: 


009003 
003002 


0S2525 


00300¢ 


000076 
004200 


152274 
COii24 


“st gar 2+ ppt alee mamma SEFEFRLAEAHLF SSSA SSLFFA SLAF SAS 


SORE 
Soy 


aSTACK, SP :RESET STACK 

MOV 84S, a8TSTNM :SAVE TEST NUMBER 
ISR PC, JeCLDISK sGIVE RH INITIALIZE 
Se ‘SETUP UNI 


NIT NUBER 
; CLEAR RHC AND FUNCTION BITS I 


#3,R1 
MOV sF OOD, R2 ip ART THREE WORD SUFFER 

:FROM AN O 00 WORD e0 UNCARY 
MOV 852525, (R2)+ sHOVE THREE S2S25 INTO BUFFER 


BNE 0 s«18 ER ENCH If THREE NOT_DONE 
MOV #BFODD, 2RHBA 367 eS ROORESS TC START 


AN ODD WORD SOUNDARY 
HOY 8-11. ,IRHWC WORD coli ELEY VEN 


J RO, SCOMND TO DO COMMAND 
WRIDAT oRITe DATA 
*CHECK THAT RHCS3 HAS DSL. 
hove sDBL, $GDDaT ;GET GOOD = 2000 
MOV JRHCS3, 380087 sREAD RHCS3 FOR COMPARISON 
CMe SGDDAT, S$BDDAT COMPARE EXPECT 
Dara WITH DATA READ FROM 
BEG 853 nShCH IF GOOD 
ERROR 124 
sAFTER SETTING *oLR” BIT #S 


IN RHCS2 TO INIT THE RH 
:A ELEVEN WORD WRITE FROM @N 
00D WORD BOUNDARY WAS DONE 


N 
SRHES3 SHOULD HAVE DBL 


Bur CONTAINED WHAT IS 
;GIVEN IN BAD RHCS3 


BIC 876, JRHOS1 sCLEAR FUNCTION BITS 
“CHECK THAT RHCS1 HAS RDY!DVA 
MOV  sRDY!DVA,SGODAT ;GET GooD = 4200 


MOV @RHCS1,$800AT  ;READ RHCS1 FOR COMPARISON 
CMP $GDDAT, SSODAT : COMPARE EXPECTED 
;DATA WITH DATA READ FROM 


SRHCS1 
SEQ 673 BRANCH IF GOOD 
ERROR 12S 
sAFTER SETTING "CLR" Bir 8S 


;IN_RHCS2 TQ INIT 
A ELEVEN WORD WRITE RON AN 


SET UP FOR A ELEVEN WORD WRITS FROM_AN ODD WORD BOUNDARY 
Vv ;COUNT OF THREE 








MATNDEC=11-DERHSS-A 
DERHAS. T4HS 


106 


BePe 


in torus Cow 


tit ated ad eat ad 
* 0-2 0-0 -+ & = b= 0 -< 8 -+ + 9-2 ( ) 


SrDrrr errr rerer3rce]e: 
at ere 

m ¥ fue 

OuUlLonte-Oom- jo 


tet et) 


SRC 


031634 
032634 
031642 
031650 


031656 
031860 


03:662 


oo 


Ow 


012737 


017737 
023737 


001401. 


104131 


BCY11 E7( 732) 
TEST DBL (RHCS3 BIT #10) TEST F 


22-SEP-76 
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sCHECK THAT RHCS2 HAS IR 
#IR, $GODAT 


ONTT $GDDAT 
JRHCS2, $BDDAT 
$GDDAT. SBDDAT 


69$ 
le6 


;CHECK THAT RHWC_HAS 0 
#0, $GODAT 


JRHWC , SSDDAT 
$GODAT, SBDDAT 


71$ 
131 


3 Mein BOUNDARY WAS DONE 
sR SHOULD HAVE RDOY!DVA 
:BUT CONTAINED WHAT IS 
:GIVEN IN BAD RHCS1 

;GET GOOD = 100 

INCLUDE UNIT NUMBER 

;READ pie cee COMPARISON 


:COMPARE EXP 
:DATA WITH BATA READ FROM 


;RHC 
.. BRANCH IF GOOD 


Ag+ a5 'TING .F tH BIT #5 
s1N RHCSe TO INIT THE R 

A ELEVEN WORD WRITE FROM AN 
:900 WORD BOUNDARY WAS DONE 


:RHCS2 SHOULD HAVE IR 
TOGETHER WITH at Stee 


;BUT CONTAINED W 
;GIVEN IN BAD cee 


;GET GOOD = 0 


;READ RHWC FOR COMPARISON 
;COMPARE EXPECT 
;DATA WITH DATA READ FROM 


Hid 
BRANCH IF GOOD 
, Ag+ SETTING Tf oe 85 


IN _RHCS2 TO INIT 
3A EL even WORD WRITE FROM AN 
$900 WORD BOUNDARY WAS DONE 


N 
SRHWC SHOULD HAVE 0 
:BUT CONTAINED WHAT IS 
GIVEN IN SAD RHWC 


5 ER EERE RARE EER EERE RARER REECE RERRRAAARARARAR 
TEST DBL (RHCS3 BIT #10) TEST G 


67$: 
900109 901124 MOV 
Roser 9 001124 gis 
152250 001126 MOV 
BOr124 501126 CMP 
BE 
ERROR 
ect; 
oo0c00 001124 hoy 
152214 01126 MOV 
051124 oO1126 CMP 
BEQ 
ERROR 
718: 
kT TEST 46 
o# 
re 
3# 


cLEAr ye SUBSYSTEM BY A ONT ROLES CLEAR (RHCS2 BIT #5) 
FOR A NINE WORD READ 
DO - NINE WORD READ FROM AN EVEN WORD BOUNDARY 


FROM AN EVEN WORD BOUNDARY 





MAINOEC-11-DERHAS-A 
DERHAS. THs 


SRC 


on of 


Hoe} ingots? “I~ 


GS 


BOG Buu tid 
fo 


b-2b op eb +p 9-+ b= 


031772 
031772 


032000 


C9090% 
Jle70§ 
Qle73? 


004737 


912701 


Si27Ce 


Ol2e7ee 


012737 
017737 
023737 


091401 
104124 


042777 
012737 
017737 
023737 


001401 
104125 





001900 
900046 


040312 


009903 
003009 


OS2SeS 


03000 
177767 
oc 8? 


1S2é 


000000 


152184 
001124 


000076 
004200 


152046 
001124 


MACYLL 27( 








OO4ESS 


152134 
1S21e4 


001124 


001126 
001126 


152060 
001124 


001126 
001126 
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TEST DBL (RHCS3 BIT #10) TEST G 
THIS SHOULD NOT SET RHCS3 BIT #10 DBL 
cae eA Ree Ss 
CHECK RHCS1,RHCS2, RHBA, RHBAE , RHWC 
eeeevgnoeneanenseanesesueseenesenasboneunssenonnecnnees 


8-9, IRHWC :WORD COUNT NINE 
RO, ICOMAD nh’ 0 DO COMMAND 
:READ DATA 


; CHECK — "scppet HAS 0 
OV 


MRHCS3,$800AT  ;READ ate Eee COMPARISON 
$GDDAT , SBDDAT scone Ae OE EXP 


: RHC 
65$ BRANCH IF GOOD 
124 


#76, IRHCS1 
icHECK THAT RHCS1 HAS RDY!D 
#RDY!DVA, SGDDAT "eet *c00 = 4200 


MRHCS1,SBDDAT ;READ RHCS1 FOR COMPARISON 
SGDDAT;SBDDAT  ;COMPARE EXPECTED 


67$ 
125 


















#STACK, SP sRESET STACK 

#46, a8 TSTNM :SAVE TEST NUMBER 

PC, J#CLDISK GIVE RH INITIAL 12 
TUP UNIT 





;CLEAR RHWC AND FUNCTION BITS IN RHCS1 


FOR A NINE WORD READ FROM AN EVEN WORD BOUNDARY 
#3,R1 sCOUNT OF THREE 
sBFEVEN, Re isTagt FHREE WORD BUFFER 

5 M AN EVEN WORD BOUNDAR 
s52525, (RE)+ Ove THREE S2525 INTO BUFFER 


UN 
1$ :BRANCH_IF THREE NOT DONE 
#BFEVEN, JRHSA sSET BUS ADDRESS TO START 
ROM AN EVEN WORD BOUNDARY 















;GET GOOD = 0 






A WITH BATA READ FROM 








;AFTER SETTING “CLR” BIT aS 
IN RHCSe TO INIT THE , 3 

3A NINE WORD READ FROM 

sEVEN WORD BOUNDARY WAS MOONE 


;RHCS3_ SHOULD HAVE _O 
BUT CONTAINED WHAT IS 
GIVEN IN BAO RHCS3 


hee FUNCTION BITS 


















DATA WITH DATA READ FROM 
:RHCS1 

BRANCH IF GOOD 

;AFTER SETTING “CLR” BIT #5 





MAINDEC-11-DERHAS-A MACY11 27(732) 22-SEP-76 15:11 PAGE 20e 
DERHAB. SRC T4S TEST DBL (RHCS3 BIT #10) TEST G 


IN RHCSe TO INIT THE RH 
NINE WORD READ FROM AN 
SEVEN WORD BOUNDARY WAS DONE 


: THEN 
ares SHOULD HAVE RDY!DVA 


e 
sBuT CONTAINED WHAT IS 
;GIVEN IN BAD RHCS1 


=CHECK THAT RHCS2 HAS - 
012737 000100 901124 Mov #IR, SGODAT :GET GOOD = 100 
953737 905010 001124 Bis UNIT, $GDDAT : INCLUDE UNIT NUMBER 


O:7737 152022 001126 MOV @RHCS2,$8DDAT  ;READ page 4 COMPARISON 


023737 OCileY 001126 CMP $GDDAT,SBDDAT  ;COMPARE EXP 
: :DATA WITH DA i READ FROM 


- ;RHCS2 
001402 SEQ $95 BRANCH IF GOOD 


104126 ERROR 126 
: ;AFTER SETTING “CLR” aM #5 
sIN RHCS2 TO INIT THE R 
NINE WORD READ FROM aN 
‘EVEN WORD BOUNDHRY WAS DONE 


N 
ete SHOULD HAVE IR 


=1 
; TOGETHER WITH aot NUMBER 
BUT CONTAINED WHAT IS 
;GIVEN IN BAD auce? 


698: 
CHECK THAT RHWC HAS O 
012737 000000 001124 MOV #0, S$GDDAT ;GET GOOD = 0 


017737 151765 O011e6 MOV JRHWC, SBODAT ;READ RHWC FOR COMPARISON 
023737 COlie4 O0lies CMP $GDDAT,S$BDDAT  ;COMPARE EXPECTED 
:DATA WITH DATA READ FROM 


: RHWC 
BEG 71$ BRANCH IF GOOD 
ERROR 131 
tN BH ag TING fon a #5 


pe WORD BOUNDARY WAS "DONE 
: THEN 


sRHWIC SHOULD HAVE 0 
BUT CONTAINED WHAT IS 
715 GIVEN IN BAD RHWC 


+ RRER HEEL EERE EERE EEE EERE E ER AREER ERE R ER RE ERE RARER EA RERE RARE ERE 
47 TEST OBL (RHCS3 BIT #10) TEST H 


EAR THE SUBSYSTEM BY A CONTROLLER CLEAR (RHCS2 BIT #5) 


CL 
SET UP FOR A TEN WORD READ FROM AN EVEN WORD BOUNDARY 





b+ bs bb 0 Fe — 





MAINOEC-11-DERHAB-A 
DERHAB. SRC TH? 


OSeiie Oue?os 
O32e1i6 012737 


4° 004737 


012701 
012702 


Ole7ee 
005301 


001374 
012777 
777 


012 
004077 
004150 


012737 
017737 
023737 


001491 
104124 


042777 
012737 
017737 
023737 


001401 


P-76 eh PAGE 203 
10) TE 


LT Mee oS eae guuaercaiiomann pemetcatima iipieamnesi nS ope pm REKFLE 












DO_A TEN WORD READ FROM AN EVEN WORD BOUNDARY A 
THIS SHOULD SET RHCS3 BIT #10 DBL 


EHECK RHCET, RHCS2, RHBA, RHBAE., RHC 





Sco 





#STACK, SP RESET STACK 

MOV #47, 28 TSTNM :SAVE TEST NUMBER 

JSR PC, JSCLDISK Sf RH INITIALIZE 
TUP UNIT 






CLEAR RHWC AND FUNCTION SITS IN RHCS! 
gf ag Tr veg, yp eo sarc 
MOV SFEVEN, R2 ; START THREE WORD BUFFER 
FROM AN EVEN WORD BOUNDARY 
MOV sS2525, (R2)+ sNOVE THREE S2525 INTO BUFFER 


N 
BNE 1$ :BRANCH IF THREE NOT DONE 
MOV #BFEVEN,QRHBA SET x” ADORESS TO START 


ROM AN EVEN WORD BOUNDARY 
MOV #-10.. RHC :WORD COUNT TEN 
R RO, ICOMND G0 TO D0 COMMAND 
READ DATA 





— 
a 































:CHECK THAT RHCS3_HAS DBL _ : 
fov #DB8L, SGDDAT ;GET GOOD = 2000 sae, : 
MOV  JRHCS3,SBDDAT  ;READ RHCS3 FOR COMPARISON a COO 
CMP  $GDDAT;SBDDAT  ;COMPARE EXPECTED ery } 
DATA WITH DATA READ FROM | , 
sRHCS3 
65$ ;BRANCH IF GOOD 


BEQ - 
ERROR 124 
oe. SETTING “CLR” BIT #5 


FROM 
sven WORD BOUNDARY Was DONE 
;RHCS3 SHOULD HAVE DBL 


BUT CONTAINED WHAT IS 
;GIVEN IN BAD RHCS3 


BIC 876, QRHCS] 5 CLEAR FUNCTION BITS 
“CHECK THAT RHCS1 HAS RDY! DV 
Mov #RDY!DVA, senbat GET ‘coo = 4200 


MOV JRHCS1,$BDDAT  ;READ RHCS1 eee COMPARISON 
CMP $GDDAT , SBDDAT ; COMPARE EXP 

:DA TA WITH ATR READ FROM 
BRANCH IF GOOD 


BEQ 67% 
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DERHAB. SRC 4? TEST DBL (RHCS3 BIT #10) TEST H 


10824 O322e 104125 ERROR 125 


1983 

13832 

10833 ni 

10834 032254 675: 

10835 ;CHECK THAT RHCS2 HAS IR 
10836 032254 012737 o00100 901124 MOV” gIR, SGDDAT 

10837 O3ee62 083737 O0S010 001124 BIS UNIT, SGDDAT 
10833 032270 017737 151574 001126 MOV  MRHCS2, SBDDAT 
19g40 032276 023737 901124 001126 CMP $GDDAT; SBDDAT 


10842 
10843 032304 001401 BEQ 693 
ipeue 032306 104126 ERROR 126 


032310 698: 
;CHECK THAT RHWC_HAS 0 
108S7 032310 012737 000000 001124 HOV #0, SGDDAT 


10853 032316 017737 151540 001126 MOV QRHWC , SBODAT 
19860 O3e3e4 Ce3737 O0lle4 OCOlice CMP $GDDAT, SBDDAT 


10862 . 
10863 032332 901401 r- Tes 71$ 
10864 032334 104131 ERROR 131 


10873 032336 71$: 





kT TEST SO 


;GET GOOD = 0 


ema YT EE ATR os eenneneiapeeces 
TEST DBL (RHCS3 BIT ¥10) TEST I 







;AFTER SETTING .F tH a #5 

sIN_RHCSe TO INIT i 

A TEN WORD READ FROM ‘ 
iby N WORD BOUNDARY has "DONE 


;RHCS1 SHOULD HAVE RDY!DVA 


*=4 
;BUT CONTAINED WHAT IS 
; GIVEN IN BAD RHCS1 










;GET GOOD = 100 
SFRNGLUDE UNIT NUMBER 


;READ RHCSe FOR COMPARISON ee 
CONE AA EX 







PECTED 
Ry —— DATA READ FROM 
BRANCH IF GOOD 
;AFTER SETTING “CLR” a aS 
RH fe 








WORD READ FROM 
EVEN WORD BOUNDARY WAS Done 
sRHCS2 SHOULD HAVE IR 
TOGETHER WITH at + ewer 


;BUT CONTAINED W 
:GIVEN IN BAD Rucse 









;READ RHWC FOR COMPARISON 
:COMPARE EXPECTED 
sDATA WITH DATA READ FROM 


; RHW 
BRANCH IF GOOD 


SAFTER SETTING “CLR” BIT aS ~ 
IN PHCS2 TO INIT THE a 

:A TEN WOR AD FROM A 

sVEN WORD BOUNDARY WAS DONE - 
Ree SHOULD HAVE 0 


BUT CONTAINED WHAT IS 
GIVEN IN BAD RHWC 
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TEST DBL (RHCS3 BIT #10) TEST I 





MAINDEC-11-DERHAS-A 
DERHAB. SRC TSO 









19880 i CLEAR THE SUBSYSTEM BY 8 CONTROLLER CLEAR. (RHCS2 B17 8 #5) 
ipess :% Bb a TEN WORD EN BRO ae RB On WORD BB vith RY 

10883 7 ULD NOT SET RHCS3 BIT #10 DBL : ; 
10884 .e cHeeK nCS3 ra 
10885 % CHECK RHces, RHCS2, RHBA, RHBAE , RHWC 

10887 ties ARR ero ea aces ee en ee 

108 932398 go0004 t4t50: SCOPE 

10889 032340 912706 001000 MOV #STACK, SP RESET STACK 

10836 032344 012737 O00950 oo4Es6 MOY #50, a8TSTNM ; SAVE TEST NUMBER 

10892 032352 004737 040312 ISR PC, JH#CLDISK sGIVE RH INITIALIZE 

10893 ‘SETUP UNIT NUBER 

10894 : CLEAR RHC AND FUNCTION BITS IN RHCS1 









1089s 

10896 -SET UP FOR A TEN WORD READ FROM AN ODD WORD BOUNDARY 

10897 032356 012701 900003 MOV R1 F THR 

10898 032362 Ole702 003002 MOV #3¢00D, Re :START THREE WORD BUFFER 

10899 “FROM AN ODD WORD BOUNDAR 

10900 032366 O12722 oS2e525 1S: MOV #52525,(R2)+  :MOVE THREE S2S2S INTO SURFER 

1090! 032372 005301 DEC Rl : COUNT 

10992 032374 001374 BNE 1$ BRANCH IF THREE NOT DONE 

10903 032376 012777 o03002 151460 MOV #BFODD,3RHBA § :SET BUS ADDRESS TO START 

10904 -FROM AN ODD WORD BOUNDARY 

1090S 932404 012777 177766 151450 MOV #-10.,QRHWC :WORD COUNT TEN 

10906 032412 004077 152222 ISR RO, ICOMND GO TO Noo COMMAND r 
10307 032416 OO4160 REQDAT :READ DATA 






;CHECK THAT pa HAS 0 






Tete O32420 012737 O00000 001124 Mov #0, SGODAT ;GET GOOD = 0 
103913 032426 017737 151500 001126 MOV MRHCS3,$BDDAT ;READ RHCS3 FOR COMPARISON 
10914 O3e434 023737 001124 001126 CMP SGDDAT, SBODAT  ;COMPARE EXPECT 
10915 ;DA ATA WITH DATA READ FROM 







10916 H 

10917 O3e44e 001401 BEQ 6S$ : BRANCH IF GOOD 

10918 O32e444 104124 ERROR 1e4 

10919 s AFTER SETTING “CLR” BIT #5 







E FR 
10922 000, WORD BOUNDARY WAS DONE 







10923 H 
10924 *RHCS3 SHOULD HAVE 0 
10925 - *BUT CONTAINED WHAT IS 
10926 ‘GIVEN IN BAD RHCS3 
i092? o32446 S$: 

10928 O32446 042777 CO0076 151404 BIC #876, JRHCS1 5 CLEAR FUNCTION BITS 
10929 “CHECK THAT RHCS1 HAS RDY!DVA 

10930 032454 012737 OO4200 001124 Mov #RDY!DVA,SGDDAT ;GET GOOD = 4200 






10932 O32%2 017737 151372 001126 MOV QRHCS1,$BDDAT  ;READ RHCS1 FOR COMPARISON 
10933 032470 023737 001124 001126 CMP $GDDAT,;SBDDAT  ;COMPARE EXPECTED 
rt a :DRTR WITH DATA READ FROM 
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032502 


032S0e 
032510 
032516 

32524 


032$32 
032534 


032564 


TSO 


001401 
104125 


012737 
053737 


017737 
023737 


001401 
104126 


012737 
017737 
023737 


C0140i 
104131 
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000100 
005010 


151346 
001124 


co0c00 


151312 
001124 


001124 
001124 


001126 
001126 


001124 


001126 
001126 
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BEQ 67$ 
ERROR 125 


678: 
:CHECK THAT RHCS2 HAS IR 
Mov #IR, SGDDAT 
Bis UNIT. $GDDAT 
MOV BRHCS2, SBDDAT 
CMP $GDDAT, $BDDAT 
BEG 69S 
ERROR 126 

693: 
sCHECK THAT RHWC HAS 0 
Mov #0, SGDDAT 
MOV JRHWC , SEDDAT 
CMP $GDDAT, S8DDAT 
BEQ 71$ 
ERROR 131 

718: 


5 RERKRRRE RHEE RHEE AREER ERA EE EERE RARER ERK RR EERE AERA RARER ERRREEEEES 
TEST DBL (RHCS3 BIT #10) TEST J 


kT TEST Sl 


;BRANCH IF GOOD 


aay R T LR” BIT aS 
eat tek 
ee BOUNDARY WAS DONE 

SHOULD HAVE RDY!DVA 

tat CONTAINED WHAT IS 

GIVEN IN BAD RHCS1 

;GET GOOD = 100 

INCLUDE UNIT NUMBER 

;READ RHCS2 FOR COMPARISON 

; COMPARE C 

;DATA WITH DATA READ FROM 


? BRANCH IF GOOD 


;AFTER SETTING “CLR” BIT #5 
IN RHCSe TO INIT THE RH 
3A TEN WORD READ FROM AN 
ODD WORD BOUNDARY WAS DONE 


;TH 
Si SHOULD HAVE IR 
; TOGETHER WITH mt NUMBER 


BUT CONTAINED WHAT IS 
GIVEN IN BAD rcs 


;GET GOOD = 0 


;READ RHWC pai. COMPARISON 
:COMPARE EXP 
:DATA WITH DATA READ FROM 


; RHWC 
:BRANCH IF GOOD 


;AFTER SETTING “CLR” BIT #5 

sIN RHCSe TO INIT THE a 
TEN WORD READ FROM 

S00 WORD BOUNDARY WAS DONE 


: THE 

* RHIC SHOULD HAVE 

‘BUT CONTAINED WHAT IS 
*GIVEN IN BAD RHWC 


coon Ww 












10938 






~ 
3 
“J 





tate 


elelalelelelelalalal=a)=) 


3 


= + 0 b— b-2 ope 
WOO NO Ul£COITUNHO 


DVWDWOOVOOVOVOVVNO0NOD oo 
SERS Ra eR TERE SEO TOES 


0 0 &— b= 6 bb 0 = 0b = 0 8 0 8 0 0 8 0 0 0 8-2 0 8 0 8 0 8 0 0 0 = 8 8 2 0 8 0 0 2 0 2 2 8 pe ee 
panitietet it be} 


0— b= + & = 9 b= bb 8 = 0 0 8 0 = 8 + 8 + 0 0 0 0 8 8 0 8 8 2 6 = 8 8 0 0 8 = 0 8 8-8 te 





o000 
eae oat = 
Nou 
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032632 
032640 
032644 
032646 
032654 
032662 


032670 
032672 


~ 032674 


032674 
032702 


032710 
032716 


bie7oe 


912737 
004737 


012701 
012702 


pieces 


4077 
004160 


012737 
017737 
023737 


001401 
104124 


042777 
012737 


017737 
023737 


001009 


000051 
040312 


900003 
003000 
OS2SeS 


003099 


177765 
151774 


009000 


1512Se 
001124 


000076 
004200 


“151144 


001124 
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004855 


151232 
151222 


001124 


001126 
001126 


151156 
001124 


001126 
001126 
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ee ene Pen aA, READ ERON Al EVEN ‘HOR. BCUNDRRY 
ie Rees Maaco abe 
T RHCS3 BIT #10 DBL 
CHECK RHCS3 
CHECK RHCS1,RHCS2, RHBA, RHBAE , RHWC 
+ pits +1 -eeelelieeiiieeibieeiieioieiieideeeiiiiaieti 


+4751: SCOPE 
MOV #STACK, SP RESET STACK 
MOV #51, a8TSTNM :SAVE TEST NUMBER 


JSR PC, J#CLDISK ;GIVE RH PNTIA, Le 
;SETUP UNIT NUBER 
CLEAR RHWC AND FUNCTION BITS IN RHCS1 


me OK oe ie ie ee 


ee we ee ee ee ee 


-SET UP FOR A ELEVEN WORD READ FROM AN EVEN WORD BOUNDARY 
hov #3,R1 ;COUNT OF THREE 
MOV SBF EVEN, R2 ;START THREE WORD 


BUFFE 
;FROM AN EVEN WORD BOUNDARY 
1$: MOV 1 sOVE THREE S2S25 INTO BUFFER 


DEC IN 

BNE 1$ BRANCH IF THREE NOT DONE 

MOV #BFEVEN,JRHBA ;SET BUS ADDRESS TO START 
;FROM PVE aven WORD BOUNDARY 


MOV #-11.,QRHWC ;WORD COUNT ELE 
R RO, 3COMND ; 60 ae i COMMAND 
_ READAT READ DATA 


:CHECK THAT RHCS3 HAS 0 
Mov #0, SGDDAT :GET GOOD = 0 


MOV @RHCS3,SBDDAT ;READ RHCS3 oo COMPARISON 
CMP $GDDAT,$BDDAT  ;COMPARE EXP 
:DATA WITH BATA READ FROM 


:RHCS 
BEQ Ess ‘BRANCH IF GOOD 
ERROR 124 | 
AFTER SETTING "CLR" BIT aS 
‘IN RHCS2 TO INIT THE RH 
tA ELEVEN WORD READ FROM AN z hi: 
EVEN WORD BOUNDARY WAS DONE laf | 
\ 


*RHCS3 SHOULD HAVE 0 
sBUT CONTAINED WHAT IS 
;GIVEN IN BAD RHCS3 


65S: 
BIC #76, DRHCS1 : CLEAR FUNCTION BITS 
-CHEUK THAT RHCS1 HAS RDY!DV 
MOV #RDY!DVA, SGDDAT GET GorD = 4200 


MOV — @RHCSL, S$BDDAT # ;READ RHCS1 FOR COMPARISON 
CMP $GDDAT,$BDDAT  ;COMPARE EXPECTED 
:DATA WITH DATA READ FROM 
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;RHCS1 
See Bw EB meme 
;AFTER SETTING “CLR” BIT 


8S 
: RH 
a ROM AN 
BOUNDARY WAS DONE 
Q SHOULD HAVE RDY!DVA 


i=H209 CONTAINED WHAT IS 
:GIVEN IN BAD PHCS1 


ine "3 SHECK THAT RHCS2 HAS IR pee ~~ 
eae? Ot Bye UNttsscopar —FENCLODE UNI? NUMBE 


017737 MOV MRHCS2,S$BDDAT  ;READ RHCS2 etre COMPARISON 
023737 CMP S$GDDAT , $BODAT ; COMPARE EXP 
;DATA WITH DATA READ FROM 


: RH 
001401 BEQ 69$ ‘ BRANCH IF GOOD 


104126 ERROR 126 
;AFTER SETTING Fh a #5 
s1N RHCSe TO INIT THE RH 
3A ELEVEN WORD READ FROM AN 
s EVEN WORD BOUNDARY WAS DONE 


N 
sRHES2 SHOULD HAVE IR 
; TOGETHER WITH UNIT NUMBER 


sBUT CONTAINED WHAT IS 
GIVEN IN BAD RHCS2 


SPRL CEE ATES | 


SS 


id 


;CHECK THAT RHWC_HAS 0 
012737 900000 001124 Rov #0, SGDDAT ;GET GOOD = 0 


017737 151064 001126 MOV DRHWC,SBDDAT  § ;READ RHWC FOR COMPARISON 
023737 901124 o01126 CMP SGDDAT,$BDDAT  :COMPARE EXPECT 

sbaTR WITH DATA READ FROM 
001401 BEQ 71$ “BRANCH IF GOOD 


104131 131 
sAFTER SETTING “CLR” BIT #& 
INIT THE RH 


PREBRER IIs 


tect 
won 


° WO ROM AN 
EVEN WORD BOUNDARY WAS DONE 


S RHIIC SHOULD HAVE 0 

BUT CONTAINED WHAT IS 

GIVEN IN BAD RHLIC 
033012 718: 


fOr Gwen Ete eo 


li 
ll 
1) 
11 
i} 

1 
11 
1} 
1] 
11 
11 
11 
il 
11 
11 
11 
1 
ll 
1] 
il 
11 
11 
11 
11 
11 
11 
11 
11 
11 
ll 
11 
11 
11 
11 
il 
1} 
1 
1} 
ll 
11 
11 
1] 
il 
11 
11 
11 
1] 
11 
1} 
11 
11 
11 
11 
11 
11 
11 


ee - OVDDODOOV0O00000 


oO 
WwW 


5 | RERRERRRERERLEE AERA ERA ER EERE RE RR EE AA RR ERE RRR ER EERE RE RA RR ERARE 





ea ee OD ca Tie yl 


;AFTER SETTING “CLR” BIT #5 

pI. es . i e's THE RH 
READ FROM AN 

+000 FORD BOUNDARY WAS DONE 


: THEN 
;RHCS3 SHOULD HAVE DBL 
BUT CONTAINED WHAT IS 
~ ;GIVEN IN BAD RHCS3 
033122 042777 000076 150730 ~~" ope #76, IRHCS1 CLEAR FUNCTION BITS 
-CHECK THAT RHCS1 HAS eoifth 
023120 012737 OO04200 001124 Mov #RDY!DVA, SGDDAT "eet *co00 = 4200 
033136 017737 150716 O01126 ~- MOV DRHCS1,S$BDDAT  ;READ RHCS1 FOR COMPARISON 


wou ££ 


WONMUILWITY 


033122 


» ’ 
0 0+ bb 0 0 0 0 0 = 0 0 0 0 0 8 0 0 0 0 8 0 2 0 0 0 8 0 0 0 2 8 8 0 0 = = 0 8 9 0 9 bo pe po pe 
0 0 0 0 bb 0 0 0 0 0 0 8 0 0 be 0 0 8 0 8 = 0 8 0 0 8 2 8 8 8 = 8 0 8 8 0 be 0 8 0 9-0 be pe bs 


104 ;¥TEST S2 TEST OBL (RHCS3 BIT #10) TEST K 
: AR_T YSTEM BY ¢ BIT #5) 

i38 ty RRA TERR HOEY ELEN Hed RERD FROM ake BB GkS BounoAR? 

108 :% A JELEVEN WORD READ WORD BOUNDARY 

103 :* THIS SHOULD SET RHCS3 art “0 og? 

11 te K RHC 

i ;# CHECK RHCS1, RHCS2, RHBA, RHBAE , RHWC 

ll . : ss PEETTC TSEC TTT TTTSTCTTOCTTOTTTTTTTTTTOTETTTETTCTESITT TTT ETT TST 

fe OTe Te Oce o0100 tSTSes Ay STACK.SP *SCSRESET STACK 

118 920 aise 7 nae 004556 MOV #52, a8TSTNM i Shve TEST NUMBER 

118 033026 004737 o40312 ISR PC,3#CLDISK _ ; GIVE _RH INITIALIZE 

il é; :SETUP UNIT NUBER 

129 :CLEAR RHWC AND FUNCTION BITS IN RHCS1 

l22 -SET UP FOR A ELEVEN WORD READ FROM AN ODD WORD BOUNDARY 

123 033032 012701 900003 hov 3,R1 : OF THREE 

1g Cle702 903002 MOV #84000, R2 SSTART THREE WORD BUFFER 

1 ?FROM AN ODD WORD BOUNDARY 

126 033042 012722 oS2525 18: MOV #52525, (R2)+ ;MOVE THREE 52525 INTO BUFFER 

127 033046 005301 DEC RI : COUNT 

128 935080 001 1374 BNE 1$ :BRANCH IF THREE NOT DONE 

1e3 933052 012 003002 151004 MOV #BFODD,SRHBA SET BUS RODRES TO START 

130 *FROM AN ODD WORD BOUNDARY 

131 033 012777 177765 150774 MOV #-11.,SRHWC ;WORD COUNT ELEVEN 

132 033066 B64 077 151546 JSR RO, ICOMND 360 TO DO COMMAND 

133 30 04160 READAT READ DATA 

135 

138 sCHECK THAT RHCS3 HAS DBL 

137 033074 012737 o02000 001124 HOV #DBL , SGDDAT ;GET GOOD = 2000 

139 033102 017737 151024 001126 MOV DRHCS3,$BDDAT  ;READ RHCS3 FOR COMPARISON 

140 033116 023737 001124 COlic6 CMP $GDDAT.$BDDAT  :COMPARE EXPECTED 

Lal ;DATA WITH DATA READ FROM 

143 033116 001401 BEQ 65S t BRANCH IF GOOD 

1a 033120 104124 ERROR 124 
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IT #10) TEST kK 
oMP $GDDAT, S8DDAT 
BEG &7$ 
ERROR 125 
67s: 
CHECK THT RECS2 HAS I 
boy aR, SGODAT 
Bis Url? , $GDDAT 
MOV JRHCS2, SSODAT 
oMP $GDDAT, SBDDAT 
SEC £33 
ERROR 126 
css: 
> CHECK ee REWC HAS O 
hoy 0,$6GD0 AT 
MOV ORHWC , SBDDAT 
oMP scoDat ‘ , SEDDAT 
BES 71§$ 
ERROR 8131 
18: 


a re en = re cone ee cee 





ONPARE EXPECTED 
a WITH DATA READ FROM 


RAC 1 

BRANCH IF GOOD 

SAF TER SETTING fo ay 
HE 


#908 WORD BOUNDARY WAS DONE 
Re SHCULD HAVE RDY!'DVA 


‘aut CONTAINED WHAT IS 
; GIVEN IN BAD RHCS1 


;GET GOOD = 


100 
INCLUDE UNIT NUMBER 


sRESD RHCS2 FOR COMPARISON 
: COMPARE EXP 
vo A WITH DATA RESD FROM 


‘RaRCH IF G00D 


Ay SETTING “CLR” SIT #& 
TIN RHCS2 TO IntT THE RH 
3H ELEVEN WORD READ FROM A 
£00 WORD BOUNDARY WAS hohe 


saHse SHOULD HAVE IR 

iT3e Toes WITH UNIT NUMBER 

aM CONTAL [NED WHAT ts 
GIVEN IN SAD RHCS2 

;GEY GOOD = 0 

;RERD RHWC FOR COMPARISON 

:COMPARE EXPECTED 

ie WITH DATR READ FROM 

‘BRANCH IF GOOD 

; AFTER ae TTING ek aS, 85 


;IN RHCS2 TO INIT T 
iA ELEVEN WORD READ "FRon BN 


$200 WORD BOUNDARY WAS DONE 


‘Pie SHOULD HAVE 0 
BUT CONTAINED WHAT IS 
tGIVEN IN BAD RHWC 
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IT 


z 15:) 
SIT #10) TEST kK 


5 RRR PPR EREEREREEE EEE RE REL AS FRR EFSF ERE RR Ee EEEPEESE CEES EREES SESS 
s*#TEST S3 TEST OBL (RHCS3 BIT #10) TEST L 


CLEAR THE yg es BY A CONTROLLER CLEAR (RHCS2 BiT 8S) 
SET UP FOR A_TEN WORD READ FROM AN EVEN WORD SOUNURSY 


-f 
:¢ 
3% 2 SET 
:* 50 a8 TEN WORD READ FROM AN EVEN WORD BOUNDARY 
:* ts SHOULD NOT SET RHCS3 BIT #10 DBL 

.* 


CK RHCS3 
CHE CK RHOS1 ,RHCS2 PHBA, RHBAE . RHC 


J tk ing tt > te aaa aia ch a sn eo 
aOhswg BSTACK,SP sRESET STACK 
My a52,a8tSTNM :SAVE TEST NUMBER 
yee PC, D8CLDISK :G1VE RH INITIALIZE 
SETUP UNIT NUSER 
tere Ruiic AND FUNCTION BITS IN RHCS! 
»SET UP FOR A TEN WORD READ FROM AN EVEN WORD SOUNDARY 
MOV 82 Ri “COUNT OF THREE 
MOY sBtEVEN, R2 spTaRT THREE WORD BUFFER 
ROM AN EVEN WORD SOUNDARY 
13: MOV #52525, (R2)+ HOVE THREE S2S25 INTO SUFFER 
oon 35 758 NH IE THREE {OT _DONE 
MOY s8FEVEN, JRHBA 37 BUS ADDRESS TS STAR 


M AN EVEN WORD 80 UNDARY 
MOV 8-10. DSHWC =i RD colt Teh 

BIS #BA! seufse ar st IN RHCS2 
SI ba acdHN -G0 TO 00 COMMAND 
EQRDAT TREAD DATA 


Q 
S 


3 CHECK THAT ait HAS 0 
Mov 80, $GDDAT ;GET GOOD = 0 


MOV «so DRHCS3. $8DDAT READ RHCS2 FOR COMPARISON 
“Mp s«SGEDATSEDDAT © :COMPARE EXPECTED 
sera MoT DATA RERD FROM 
BFQ «SS PORANCH IF GOOD 
FEEOR id 
SAFTER SETTING "CLR" SIT #5 
PIN RHCSS TO INIT THE RH 
itty BAI IN RHsSe SET 
'RHES3 SHOULD HAVE 0 
tBUT CONTAINED WHAT Is 
PSIVEN IN SAD RHCSS 


BIC 876, 9RHCS! ;CLEAR FUNCTION BITS 


£53: 
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=11-DERHAB-A - 
SRC TS3 
033364 Ol2737 
Q33378 O17737 
JS3400 Sess" 
O3340& 991401 
O334i9 104125 
033412 . 

O334iz 012737 
033420 05373: 
93 017737 

SSau50 023737 

033442 90140) 
OSS444 104le6 

' O33446 
Oss44& 912737 
033454 017737 
C3342 023737 
033479 00140) 
Oss47e 104132 


MACYI) 27 (732) 
TEST OBL cRACS 
004200 001124 
1S0462 OO11zs 
O2iis# o0i12s 
000i19 01124 
605018 01124 
150435 OO01126 
091124 01126 
osg0co 001124 
10402 O01126 


O0l1e4 O0l12e6 


67s: 


538: 





15:11 PAGE 212 
sT 


a THAT RHCS1_ HAS RDY!DVA 


MOV BROY'DVA,SGDDAT ;GET GOOD = 4200 

MOV QRHCS1, $ED0DRT  ;READ RHCS1 FOR COMPARISS 

CMP $GDDAT;$80D8T  :COMPARE EXPECT 
:DATA WITH DATA READ FROM 
:RHCS1 

BEQ 67$ sBRANCH IF GOOD 

ERROR 125 F 
AFTER SETTING ~ CLR" BIT #5 
sIN RHCSS Sz ie INIT THE FH 


ORD READ FROM 
sEVEN WORD BOUNDARY Was DONE 
;WITH BAI IN RHCS2 SET 


if HEN 
sRHCSI SHOULD HAVE RDY!DVS 


‘aur CONTAINED WHAT IS 
:GIVEN IN 5AD RHCS! 


CHECK THAT RHCS2 HAS IR!SAI 
Mov BIRISAI SGDDAT ;GET GOOD = 110 
BIS UNIT, $GODAT : INCLUDE UNIT NUMBER 
MOV DRHCS2.$BDDAT  ;READ RHCS2 FOR COMPARISO 
CMP SGODAT, SBDDAT ; COMPARE EXPECTED 
:DAT Re WITH DATA READ FROM 
tORARCH IF GOOD 


sAFTER SETTING 


69$ 
l26 


mMu.o 


“et 7% 85 
T_THE RH 


4 
SEVEN WORD BOUNDARY WAS DONE ¥ 
;WITH BAI IN RHCS2 SET 


HE'N 
ins SHOULD HAVE IR!BAT 


Tate rue WITH UNIT NUMSER 
“BUT CONTAINED mill Is 
: BIVEN IN BAD RHCS 


pCHECK THAT RHWC _HAS 0 
MOV iDDAT 


LU, BUA 


;GET GOOD = 0 


MOV SRHWC,SBDDAT REAL RHA FOR COMPARISON 
CMP $GDDAT.$BDDAT  :COMPARE EXPECTED 
:DATR WITH DATA READ FROM 
BEG 713 “BRANCH IF GOOD 
ERROR 131 
;AFTER SETTING “CLR” er 8s 
SIN RHCS2 10 INIT THE R 


LEVEN WORD BOUNDARY WAS D 
:WITH BAI IN RHCS2 SET 
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MATNDEC-11-DERHAS-A MACY11 &7 1§:1 
T DSL iRHCS3 BIT #10) TEST L 


DERHRE. SRC T$3 
























75 sDATR WITH DATA READ FROM 
77 032600 001401 Beg ess :BRANCH IF GOOD 
032602 104i24 ERROR 124 


4g SETTING “CLR” BIT #5 

N RHCSe TO INIT THE RH 
‘A ONE WORD WRITE REVERSE FROM AN 
sEvEN WORD BOUNDARY WAS DONE 


11328 : THEN 

11338 RHC SHOULD HAVE © 

12330 “BUT CONTAINED WHAT IS 

133 eee GIVEN IN BAD RHWC 

11332 O33474 718: 

11333 

11335 

11335 

11336 

llss? 3 2g naan 4 WS Sayeed Soh Wes i a 2 et tatty 
iss teTEST S4 TEST DBL (RHCS3 BIT #10) TEST 

11348 :* CLEAR THE SuesySTEN BY A CONTROLLER CLEAR (RHCS2 BIT #5) 
11342 1+ SET UP FOR A ONE WORD WRITE REVERSE FROM AN EVEN WORD BOUNDARY 
11343 :# 50 A ONE WORD WRITE REVERSE FROM AN EVEN WORD SOUNDAR 

11343 4% THIS 54 SHOU culo NOT SET RHCS3 SIT #10 DEL 

LL3s4 7% w C 

11335 :* EMECK aneey RHCS2, RHA, RHBAE, RHIC 

11347 © e REPSSSSELSESSSSFSESLASSSSSSLSESLFESRSSELRESLSFELSSLHESFELSLSLSLEASSLE 
11348 033474 900004 *S7S4: SCOPE 

11343 35476 012706 901000 MOV #STACK, SP RESET STACK 

1135° O33502 Olz737 O000S4 OD4éSE MOV 854, Ja TSTNM “SAVE TEST NUMBER 

11355 03310 OO4737 O40312 ISR PC, DACLOISK GIVE RH. TNITTOLIZE 

1 354 SEEEAR Reuie AND FUNCTION SITS IN RHCSI 
8 eee hseea ews ET UP QR A ONE WORD UR] HE REVERSE FROM AN EVEN WORD BOUNDARY 
11358 033520 Ole722 202000 MOV SEVEN, Re ET ORT THREE WORD SUFFER 

11369 : FROM AN EVEN WORD BOUNDARY 

1 £350 933524 12722 os2s25 18: Mov #52525, (R2)+ sMOVE THREE 52525 INTO BUFFER 
iiss S33652 00757 BeOS SBRANCH IF THREE NOT DONE 

11363 833534 615777 po3000 1S0322 MOV SEFEVEN,dRHBA :SET SUS ADDRESS TO START 

123645 jFRON AN EVEN WORD SOUNDARY 

titer SEECE SLErOo tei eeg +SOele Bae a Petey SP 

ssc5 VIS ow we tel ft oweww PP) Ade 

11382 S33555 304204 REVHRT TREVERSEWRITE DATA 

11369 

1556 SCHECK THAT RHCS3 HAS 0 

i137 032556 012737 O00000 001124 hoy #0, SGDDAT GET GOOD = 0 

11372 933564 017737 159342 001126 MOV SRHCS3,SBDDRT © ;READ RYCS3 FOR COMPARISON 

11374 033672 023737 Oolle4 001126 CMP $GDDAT;$8DDAT  :COMPARE EXPECTE 

tT5E 

71% 

133 


cococodo "383 
quroe-(Ca.000 





0+ b= 9h = p+ pape 
GIGIGIGIGIG) GIGIGI GIGS 


: 
: 
3 
3 
§ 
g 
3 
9 


4 
> 
2 
3 
3 
0 
1 
e 
3 
3 

$s 
$ 
8 
3 
) 
i 


NOOMOOOMCw 
JUNE toro Fripoate 


~ 


etetetetatetete A CG IGIGIGS 


Leos we reele ies [ealiam Steel ill Sol ary es) 


TUT b+ 0+ 0 tt 


Wa 


Be 8 bt be be hh Be he he ee eo 8 he Be 0 he he ht he 8 bt he hn bo he eh hh 8 bob bs poh hoe Pop pu Pepe 
ruruorururofrofru 


0 8 eo ot 2 be hh eo 8 0 8 he 8 88 8 bh ho bo 2 0 ne bh 0 he bo 8 hh 2h he Fh pe Bo 


40 4 ee 


L2wO0O SOP U1 Gore (000 NIC UT Go 


COGIC GIGI LO COCIG) 





Se) } 


oe 


GIG) 


033640 


033640 
033646 


023854 


923674 


~~ oe 


03374 


LL-DERHSS-8 
: 154 


O4e777 


012737 


017737 
023737 


en 1§; 
(RHCS3 BIT 310) TEST M 
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BIC 876, 3RHCS1 


MOV JRHCS1 , SBDDAT 
CMP $GDDAT, $8DDAT 


SEO 67 
ERROR 125 

;CHECK THAT BuCSE HAS IR!OR 
MOV SIR!OR. SGDDAT 

BIS SNTT. OSabear 

MOY SRHCS2, $BDDAT 

CMP $GDDAT. SBDDAT 

BEQ $9 

ERROR 126 


;CHECK THAT RHWC ¥ 0 
MOV #0, $GODAT 


MOV IRHWC , $BDDAT 
CMP SGDDAT, SBDDAT 


BEG 71$ 
ERROR 131 


ee ne oe ee ee 





sRHCS3 SHOULD HAVE 0 
But CONTAINED WHAT 1s 
‘CLEAR FUNCTION BITS 
;CHECK THAT RHCS] HAS scirpy!DvA 
OV aSC!RDY!DVA, $GDDAT 
58D BHCS! =f oR COMPARISON 
DATA a WTA ABSA READ FROM 
SSRANCH IF GOOD 
sETER SETTING wou" 827 2S 


E REVERSE FROM AN 
be WORD BOUNDARY WAS DONE 


:RHCS1 SHOULD HAVE SC!RDY!DV 
4200 


BUT CONTAINED WHAT IS 
GIVEN IN BAD RHCS! 


SFRCLUDE. UNI? NUMBER 

s READ Srbeae FOR ¢ COMPARISON 
A WITH DATA READ FROM 
:BRSRCH IF G00D 

fvrences 10 ty reek BLT BIT ss 


THE R 
A ONE WORD WRITE RE VERSE FROM AN 
SEV EN WORD BOUNDARY WAS DONE 


tRHCS2 SHOULD HAVE IR!0R 
TOGETHER Wien eae UNTY Sarees 
: GIVEN IN BAD sticse 


:READ RHWC oe COMPARISON 
A WITH ORtR READ FROM 
S BRANCH IF GOOD 


SAFTER SETTING “CLR" BIT # 
;IN RHCSe TO INIT THE RH 
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MSCY11 27(732) 1 
TEST DBL cmgeae BIT 10)” TES 


wm 
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3A ONE WORD WRITE REVERSE FROM AN 
iby N WORD BOUNDARY WAS DONE 


THEN 
SRHWC SHOULD HAVE 0 
:BUT CONTAINED WHAT IS 

“ :GIVEN IN BAD RHWC 

( : 


itest ce TEST Del (iced BIT aio) vest 


7 SS TEST DBL (RHCS3 BIT #10) TEST N 
4 CLEAR THE SUBSYSTEM, BY 8 CONTROLLER CLEAR (RHCS® ETT 45) 
ty SET UP FOR A TWO W REVERSE FROM AN EVEN ORD BOUNDARY 
+ BB a TWD KORD LRT SE REVERSE EROAEN ECEN foRB Bounseey 
- THIS SHOULD NOT SET RHCS3 BIT #10 DBL 
ty CHECK RHCS3 
ty EHEEK RHEE], RHCS2, RHBA, RHBAE, RHWC 
jiseneenneesreenececeenneneeecnnnecaenenentenaenenseneeaecnenens 

SCOPE 

MOV STACK, SP sRESET STACK 

OV #55, a8tSTNM :SAVE TEST NUMBER 
JSR PC, aRCLDISK —«; GIVE RH INITIALIZE 
:SETUP UNIT 


NUBER 
:CLEAR RHWC AND FUNCTION BITS IN RHCS1 
;SET UP +% A TWO WORD WRITE eran FROM AN EVEN WORD BOUNDARY 
R Ct OF THREE 


MOY Sa¢EVEN, R2 ONT THREE WORD SUFFER 
:FROM AN EVEN WORD BOUNDAR 
1S: Noy 852525, (R2)+ sHOVE THREE S2525 INTO BUEFER 
DEC 
BNE i ‘BRANCH IF THREE NOT DONE 


MOV SeFEVEN, ORHEA, :SET BUS ADDRESS TO START 

ROM AN EVEN WORD BOUNDARY 
MOV #-2,3RHNC :WORD ount TWO 
JSR RO. aCOMND G0 TO DO COMMAND 
REVWRT TREVERSEWRITE DATA 


;CHECK THAT RHCS3 HAS O 
MOV 80, $GDDAT ;GET GOOD = 0 


MOV DRHCS3,$B8D0AT ;READ nage ae COMPARISON 
CMP $GDDAT,$B80DAT  ;COMPARE EXP 
DRT A WITH BATA READ FROM 


HCS 
BEQ €s$ ‘BRANCH IF GOOD 
ERROR 124 


;AFTER SETTING “CLR” a .s 
:IN_RHCS2 TO INIT THE R 

A THO WORD WRITE REVERSE FROM AN 
SEVEN WORD BOUNDARY WAS DONE 
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= B+ b+ bs os Bs 2 a hs bo 0 


nd a | tale 
HAB. SRC TSS 


03432 
034032 


o34040 
os4O4e 
O34054 


034062 
034084 


O340EE 
O34086 


034074 


03410 
034110 


034122 
O34i22 
034130 
034136 


24144 
O3414e 


MACY11 E77 (722) 
TEST DBL (RHCS3 BIT #10) TES 


000076 
104200 


iS0C06 
001124 


000300 
505010 
147762 
001124 


00c083 001124 


147726 001126 
O0ile4 001126 
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HEN 
 RNGS 2 SHOULD HAVE _0 
;BUT CONTAINED WHAT IS 
;GIVEN IN BAD RHCS3 


BIC 876, IRHCS! ;CLEAR FUNCTION BITS 
-CHECK THAT RHCS1 HAS SCIRDY!DVA 
Mov #SC!RDY!DVA, SGDDAT :GET GOOD = 104200 


MOV MRHCS1,$8DDAT  ;READ RHCS1 FOR COMPARISON 
CMP $GDDAT,SEDDAT  ;COMPARE EXPECTED 
DATA WITH DATA READ FROM 


:RHCS 
67$ :BRANCH IF GOOD 


BEQ 
ERROR les 

;AFTER SETTING “CLR” SIT #5 

SIN Rees TO INIT THE RH 

A THO WORD WRITE REVERSE FROM AN 
:EVEN WORD BOUNDARY WAS DONE 


;RHCS1 SHOULD HAVE SCIRDY!DVA 


4 
‘BUT CONTAINED WHAT IS 
;GIVEN IN BAD RHCSi 


;CHECK THAT RHCE HAS IR!OR 
Moy sTR!OR. $GDD :GET GOOD = 309 
BIS ONT. OF B sae INCLUDE UNIT NUMBER 


MOV DRHCSE,SBDDAT READ RHCSe FOR COMPARISON 
CMP $GDDAT.$8DDAT  ;COMPARE EXPEC 
DATA WITH para READ FROM 


D 
~~ 


HCSe 
BES 69S ‘RANCH IF GOOD 
ERROR 126 
sGFTER SETTING "CLR" BIT #5 
:1N N RHC S2 1 att 


THE RH 
TWO WORD WRITE REVERSE FROM AN 
Ar WORD BOUNDARY WAS DONE 


;RHCS2 SHOULD HAVE IR!OR 
TOGETHER WITH ree , Breer 


:BUT CONTAINED W 
GIVEN IN BAD Rucee 





sCHECK THAT RHWC HAS 0 
ov 80,$GDDAT - :GET GOOD = 0 


MOV DRHWC , SBDDAT ;READ RHWC FOR. COMPARISON 
CMP SGDDAT,$BDDAT  ;COMPARE EXPECT 

me WITH DATA READ FROM 
; t BRANCH IF GOOD 


;RFTER SETTING “CLR” BIT aS 


BEG 71 
ERROR 13 
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DERHAB. SRC TSS TEST DBL (RHCS3 BIT #10) TEST N 
115S2 sIN RHCS2 TO INIT THE RH 
11553 THO WORD WRITE FE VERSE FROM AN 
11555 eh WORD BOUNDARY WAS DONE 
11535 
L1ESé sRHWC SHOULD HAVE 0 
11557 :BUT CONTAINED WHAT IS 
11558 :GIVEN IN BAD RHWC 
1155S 034150 718: 
11569 
11561 
1562 
11563 ie Fe EEE B HEHE BEEBE HE EBB RHEEHHEERSERSEB PSe 
ibe} !kTEST SE TEST DBL (RHCS3 BIT #10) TEST O 
L586 :# CLEAR THE SUBSYSTEM BY A CONTROLLER CLEAR (RHCS2 SIT #5) 
11567 2% SET aut FOR A TWO WORD WRITE REVERSE FROM AN ODD WORD BOLNDARY 
i1dée x DO A TWO WORD WRITE REVERSE FROM AN ODD WORD BOUNDARY 
11589 :# THIS SHO SHOULD SET RHCS2 BIT #10 DEL 
eect : 
Li3ek :* CHECK RHEL, RHCS2, RHSA, RHBAE , RHWC 
é 
11573 © LELEEELFEEEL KES AFL SL AETEEFFE LES LHEEREEASSRSLSLAEEESESFESSRETFEHE 
11574 034150 oo90004 téTs6: SCOPE 
11575 034152 012706 901090 MOV #STACK, SP sRESET STACK 
11578 934156 012737 O8COSs oco4ess MOV #56, a¢TSTNM :SAVE TEST NUMBER 
¢ 
11572 O34:84 004737 Cc4O312 JSR PC, J#CLDISK ;GIVE RH INITIALIZE 
11579 :SETUP UNIT N 
11580 :CLEAR RHWC AND FUNCTION BITS IN RHCS! 
11582 ;SET UP FOR A TWO WORD WRITE REVERSE FROM AN ODD. WORD BOUNDARY a 
11583 024170 012701 009003 MOV #3,R1 ;COUNT OF THREE Ae 
11584 034174 12702 o02002 MOY #3F000, R2 ; START THREE WORD BUFFER Th 
1158s 7 FROM AN ODD WORD BOUNDAR we 
11586 034200 ol2722 oOs2525 1S: MOV 852525, (R2)+  ;MOVE THREE S2S25 INTO SUPFER 
11587 034204 00530! DEC R1 : COUNT 
11588 O34206 001374 BNE 13 -SRANCH IF THREE NOT DONE 
11589 O34210 O12777 cosD02 147646 MOY #BF ODD, JRHBA ;SET BUS ADDR=SS TO START 
11590 ) ?FROM AN ODD ‘WORD BOUNDARY 
11591 934216 012777 177776 147626 MOV &-2,9RHWC ;WORD COUNT TWO 
11592 624524 904077 150410 JSR ‘RO, aCOMND 360 TO_DO_ COMMAND 
11583 034230 O04204 REVWR !REVERSEWRITE DATA 
11595 
LISS6 :CHECK THAT RHCS3 HAS DEL 
11537 024232 012737 o02000 001124 HOY #DBL, SGDDAT ;GET GOOD = 2000 
| T1568 o94240 017737 14766 001126 MOV JRHCS3, SBDDAT ;READ RHCS3_FOR COMPARISON 
| 11609 O34246 023727 001124 o01126 CMP GDDAT;SBDDAT  :COMPARE EXP 
| 11603 -DATA WITH DSTA READ FROM 
11602 :RHCS3 
11602 oO34254 c01401 SEQ. sGSS BRANCH IF GOOD 
L1E54 34256 104124 ERROR 124 
LIES sAFTER SETTING "cup" BIT #5 
| T1E0e :IN RHCS2 TO INIT THE RH 
| 11607 "A TWO WORD WRITE REVERSE FROM AN 
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;0D0 WORD BOUNDARY WAS DONE 
p Ru SHOULD HAVE DBL 


‘BUT CONTAINED WHAT IS 
;GIVEN IN BAD RHCS3 


BIC 876, JRHCS1 iCLEAR FUNCTION BITS 
-SHECK THAT’ RHCS1 HAS Sci RDY!DVA 
MOV #SC!ROY!DVA, SGDDAT :GET GOOD = 104200 


MOV @RHCS1,$8DDAT  ;READ RHCS1 FOR COMPARISON 
CMP $GDDAT,SBDDAT  ;COMPARE EXPECTED 
:DATA WITH DATA READ FROM 


BEY $7$ BRANCH IF GOOD 

ERROR 125 
avy + SETTING “CLR” BIT #5 
sIN RHCS2 TO INIT 


HE RH 
TWO WORD WRITE REVERSE FROM AN 
fie WORD BOUNDARY WAS DONE 


'RHCSI SHOULD HAVE SCIRDY!DVA © 


BUT CONTAINED WHAT IS 
GIVEN IN BAD RHCS1 


CHECK THAT RHCSE HAS IR!OR 
MOV #IR!OR $GDDAT  ;GET GOOD = 300 
BIS UNIT, SQDDAT INCLUDE UNIT NUMBER 


MOV @RHCS2,$8DDAT  ;READ RCE Foe COMPARISON 
CMP $GODAT, SBDDAT : COMPARE EXP 
DATA WITH BAYA READ FROM 


:RHCS 
69$ BRANCH IF GOOD 


BEQ 
ERROR i126 
;AFTER SETTING fh BIT # 
IN RHCS2 TO INIT THE R 
TWO WORD WRITE REVERSE FROM AN 
+ O00 WORD BOUNDARY WAS DONE 


Buse SHOULD HAVE IR!OR 

; TOGETHER WITH re NUMBER 
BUT CONTAINED WHAT IS 
:GIVEN IN BAD Rucee 


“CHECK THAT RHWC HAs 0 
MOV #0, SGDDAT :GET GOOD = 0 


MOY DRHWC.SBDDAT  § ;READ RHWC FOR COMPARISON 
CMP $GDDAT,$BDDAT © :COMPARE EXPECTED 
sDATR WITH BATA READ FROM 


BEG 718 :BFANCH IF GOOD 
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11664 O34374 104131 ERROR 131 
Ag SETTING “CLR” BIT #5 
RHCSe TO INIT THE RH 
ia TWO WORD WRITE REVERSE FROM GN 
:900 WORD BOUNDARY WAS DONE 


HEN 

:RHWC SHOULD HAVE 0 
BUT CONTAINED WHAT IS 
GIVEN IN BAD RHWC 


COOrrromwu 
INIIO OOO 


“II 


034376 718: 


£Gfu-OwWM~IjI0' UT 


ul 


jotu 


itrer > TeCT DAL (RHCSa BIT 810) TEST PS 


—y™. 





1 
1 
l 
ll 
ll 
ll 
ll 
ll 
11s 
lls 
lls 
ite 

45 t 
i178 ETEST 57 TEST DBL (RHCS3 BIT #10) TEST P 
11680 7* CLEAR THE yy rue BY A CONTROLLER eee (RHCS2 BIT #5) 
11881 ae: 3% SET UP FOR A THREE WORD WRITE REVERSE FROM AN EVEN WORD BOUNDARY 
11682 3% DO @ THREE WORD WRITE REVERSE FROM AN EVEN WORD BOUNDARY 
11683 . 3% THIS SHOULD SET RHCS3 BIT #10 DBL 
11884 si 3% CHECK RHCS3 
iiPee ;* CHECK RHCS1,RHCS2,RHBA, RHBAE , RHWC 
11687 ss KXXH KSSH HELE RHEL LH KALE RESELL ELE SHALL ERASE ES KLEE REELS EKER LS EEEL ERE 
11688 034376 OO0004 T5157: SCOPE 
116839 034400 Ql2706 001000 MOV #STACK, SP “;RESET STACK 
titer 034404 612727 cno00S7 oo4Ess MOV #57, aatSTNM : SAVE TEST NUMBER 

5 
11692 O34412e 004737 O40312 JSR PC, d#CLDISK s GIVE RH INITIALIZE 
11633 ;SETUP UNIT N 
tite : CLEAR RHWC AND FUNCTION BITS IN RHCS1 
11696 >SET UP Ay A THREE WORD Beth’ REVERSE FROM AN EVEN WORD BOUNDARY 
11697 O34416 012701 090003 MOV . COUNT HREE 
11698 O344%e2 Ole702e 003000 - . MOV HSFEVEN, Re : START THREE WORD BUFFER 
1ié33 . :FR OM AN EVEN WORD BOUNDARY 
11706 O34426 Ol2722 O5eS5es5 1$: MOV #52525, (R2)+ ; MOVE THREE 5252S INTO BUFFER 
11701 O34%4%32e 005301 DEC Rl U 
11702 O34434 9001374 BNE 1$ BRANCH IF THREE NOT poe 
11703 O3483& 912777 OO3000 147420 MOV #BFEVEN, JRHBA :SET BUS ADDRESS TO START 
11704 : FROM " EVEN WORD BOUNDARY 
1170S O34444 012777 17777Seel47410 - MOV #-3,9RHWC ;WORD COUNT THRE 
11706 34452 004077 150162 JSR "RO, ICOMND ;G0 nf Eno C AND 
117 OS44S& 004204 REVWRT REVERSENRITE. DATA 
117085 
11710 *CHECK THAT RHCS3 HAS DBL 
+1713 OS44E0 012737 O02000 O0lie4 MOV #OBL,SGDDAT - ;GET GOOD = 2000 
11713 O3448& 017737 147440 001126 MOV MRHCS3, SBDDAT ; READ RHCS3 FOR COMPARISON 
11714 034474 023737 OO112e4 COlleéb CMP $GDDAT. $8DDAT  ;COMPARE EXPECTED 
11715 ;DAT A WITH DATA READ FROM 
bg! Se :RHCS3 
11717 034502 001401 BEQ 6S$ : BRANCH IF GOOD 
Heat Os4504 i04124 ERROR 124 


;AFTER SETTING “CLR” BIT a5 
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oo0c0c 00!124 


1472Se 001126 
001124 O01126 















;IN_RHCS2 TO INIT THE nh 
7A THREE WORD WRITE REVERSE FROM AN 
VEN WORD BOUNDARY WAS DONE 


sRHCS3 SHOULD HAVE DBL 


‘BUT CONTAINED WHAT IS 
GIVEN IN BAD RHCS3 


BIC #76, 0RHCS1 - CLEAR FUNCTION BITS 
“CHECK THAT RHCS1 HAS SCIRDY!DVA 
MOV #SC!RDY!DVA, SGDDAT ;GET GOOD = 104200 


MOV @RHCS1,S8DDAT  ;READ RHCS1 FOR COMPARISON 
CMP $GDDAT,$BDDAT  ;COMPARE EXPECTED 
;DATA WITH DATA READ FROM 


HCS1 
673 t BRANCH IF GOOD 


BEQ 
ERROR 125 
;AFTER SETTING as A #5 
IN RHCS2 TO INIT THE R 
iA THREE WORD WRITE REVERSE FROM AN 
aVEN WORD BOUNDARY WAS DONE 


sRHCS1 foe HAVE SC!RDY!DVA 


‘BUT "EONTAINED WHAT IS 
GIVEN IN BAD RHCS1 


:CHECK THAT RHCS2 HAS IR!OR 
MOV #IR!OR,SGDDAT  ;GET GOOD = 300 
BIS UNIT, SABsar INCLUDE UNIT NUMBER 


MOV MRHCS2,$BDDAT  ;READ a 4 COMPARISON 
CMP $GDDAT . SBDDAT ; COMPARE EXP 
DAT A WITH BATA READ FROM 


;RHCSe 
693 t BRANCH IF GOOD 


BEG 
ERROR 126 
;AFTER SETTING Fo BIT #5 
sIN RHCSe TQ INIT THE RH 
THREE WORD WRITE REVERSE FROM AN 
EVEN WORD BOUNDARY WAS DONE 


 RHCS2 SHOULD HAVE IR!OR 


TOGETHER WITH rei NUMBER 
:BUT CONTAINED WHAT IS 
GIVEN IN BaD RHCSE 


“CHECK THAT RHWC HAS 0 
MOY #0, SGDDAT :GET GOOD = 0 


MOV DRHUC,SBDDAT  § ;READ RHWC FOR COMPARISON 
CMP $GDDAT,SBDDAT  :COMPARE EXP 
‘DATA WITH ABSA READ FROM 








MAINDEC-11-DERHAB-8 


MA 
DERHAS. SRC 


7? 934620 
O3462e 


034524 


= ie 


NONIGOOVCOOWWOWOWOWOOWO 
MNL£WwH- OW ym 


034624 
O34626 
034632 


0& O34640 


OS4644 
034650 


034654 


034654 


034672 
034700 
034704 


TOMO = 0 
WM OWONMU SM} OWOD~) 
oO 
Ww 
£ 
o 
o 
Oo 


2S 034706 


8 
8 
827 034714 
ace 034722 
g 
8 


31 034730 








TS? 


001491 
104131 


o00094 
012706 
012737 


004737 


012701 
012702 


Ol272e 


012777 
012777 


004077 
004204 


012737 


017737 
023737 


001401 


AeY11 27 (732 
TERY DBL (RHC 


601000 
000069 


040312 


009093 
003002 


052525 


003002 


177775 
147734 


oco0ce 


147e2le 
001124 


OO46SE 


147172 


147162 


001124 


001126 
001126 


} 
S 
























ee-SEP-76_ 15 ; PAGE 221 
BIT #10) TEST 
; RHWC 
BEQ 71$ ;BRANCH IF GOOD 
ERROR 131 
At + SETTING “CLR” BIT #& 
sin HCSe TO INIT 


THE _RH 
THR EE WORD WRITE REVERSE FROM AN 
rEVEN WORD BOUNDARY WAS DONE 


t RHLIC SHOULD HAVE 0 

:BUT CONTAINED WHAT IS 
715 :GIVEN IN BAD RHWC 
718: 


DEGREE HEHEHE HEHEHE HEHEHE 
TEST £0 TEST DBL (RHCS3 BIT #10) TEST Q 


;* CLEAR_THE SUBSYSTEM BY A CONTROLLER CLEAR (RHCS2 BIT #5) 
7 SET UP FOR A THREE WORD WRITE REVERSE FROM AN ODD WORD BOUNDARY 
;% DO A THREE WORD WRITE REVERSE FROM AN ODD WORD BOUNDARY 

3% THIS ace NOT SET RHCS3 BIT #10 DBL 
:* CHECK RHCS3 
;* CHECK RHCS1,RHCS2, RHBA, RHBAE , RHWC 


ERT Bee ee ee ne ca eee eee 
T60: SCOPE 


#STACK, SP :RESET STACK 
MOV #60, J8TSTNM :SAVE TEST NUMBER 
ISR PC, J#CLDISK :GIVE RH INITIALIZE 


:SETIP UNIT NUBER 
- ;CCEAR RHWC AND FUNCTION BITS IN RHCS1 


;SET UP Ay A THREE WORD hy rev FROM AN ODD WORD SOUNDARY 
MO R ;CCUNT OF THREE 


MOV #8F00D, Re START PUREE WORD BUFFER 
“FROM AN ODD WORD BOUNDARY 
13: NOY s52525, (R2)+ s MOVE THREE S2525 INTO BUFFER 
BNE Rg BRANCH IF THREE NOT DONE 


MOV sBF 00D, JRHBA :SET Ra ADDRESS TO START 
AN ODD WORD BOUNDARY 


ROM 
MOV #-3,9RHWC :WORD COUNT THREE 

ISR RO, JCOMND :GO TO DO COMMAND 
REVWRT REVERSEWRITE DATA 


“CHECK THAT RHCS3 HAS 0 
Mov #0, $GDDAT ;GET GOOD = 0 


MOV JRHCS3,SBDDAT  ;READ page re COMPARISON 
CMP $GDDAT,$BDDAT  ;COMPARE EXP 

se METH BATA READ FROM 
BEG 65$ :BRANCH IF GOOD 
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S35 DEE 


wee 


-DERSS f-8 
T&O 


wm OO 


WWI 
YYZ KES 


™“ 


Ps 
INN 
LIN 


fy h, WITH DATA READ FROM 
; ‘BRANCH IF GOOC 


; AFTER 251 ING ete Ph 8S 
33N RHCSe TO INIT THE & 

THREE WORD WRIT E REVERSE FROM AN 
i600 WORD BOUNDARY WAS DONE 


N 
+t SHOULD HAVE 0 


;BUT CONTAINED WHAT IS 
:GIVEN IN BAD RHWC 


acta: et im imettat aie 


SETEST 61 TEST DBL (RHCS3 BIT #10) TEST 

:# CLEA AR THE SUBSYSTEM BY A CONTROLLER CLEAR (RHCS2 BIT #5) 

:# SET UP FOR A WORD WeITE REVERSE FROM AN EVEN WORD BOUNDARY 
+ ITH BAI IN arse BIT #3 SET 

:# D0 A TWO WORD WRITE REVERSE FROM_AN EVEN WORD BOUNDARY 

i THIS 5, SHOULD NOT SET RHCS3 SIT #10 DSL 

i+ EHECK RHCE1RHCS2, RHSA, RHBAE, RKWC 


51 iedatad-+-+-+-+ Sates hatin cia tniiaialialimiie 
SsT&l: SCOPE 


MOV #STACK, SP :RESET STACK 
MOV #51, a8tSTNM -SAVE TEST “NUMBER 
JSR Po, JeCLDISK :GIVE RH IN? TIGLIZE 


:SETUP UNIT NUSCR 
:CLEAR RHWC AND FUNCTION BITS IN RHCS! 


sSET UP 44 RA TWO WORD eds iN OF ts FROM AN EVEN WORD BOUNDARY | 


MOY ss BPEVENR2 Hit, THREE WORD BUFFER 
;FROM AN EVEN WORD SOUNDARY 
18: MOV sseSeS, (Re) sMOVE THREE $2525 INTO BUFFER 


BNE 1$ ‘BRANH TF THREE NOT _DONE 

MOV BSFEVEN, JRHBA SE BUS ADDRESS TO STA 
est ROM AN EVEN WORD Buns RY 
<2, ORHUC ,HORD coy nb THC 

BIS 8 sat oeHtse is SET BAI IN RHCSe 


be acon 3G0 TO DO COMMAND 
REVWRT SREVERSEWRITE DATA 


: CHECK THAT RHCS3 HAS 0 
hoy 80, $GDDAT :GET GOOD = 0 


MOV DRHCS3,;$BD0RT  ;READ RHCS3 FOR COMPARISON 
CMP $GODAT:SEDDAT © ;COMPARE EXPECTED 
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nERHAS. SAC Se FEST ASE ad8c5 EET SST OS ore deh 
11944 “DATA WITH DATA READ FROM 
L1IS4s *RHCS 
11948 935184 o01401 REQ sg SS -TBRANCH IF GOOD. 
t194> O55168 108134 ERROR. 124 
11948 :FTER SETTING “CLR” BIT 4S 
11948 SIN RHCS2 TO INIT THE & 
13950 ‘THO HORD WRITE REVERSE FROM AN 
1395) :EVEN WORD BOUNDARY WAS DONE 
11353 :HITH BAL IN RHCS2 SET 
1254 ‘RUFS3 SHOULD HAVE 0 
11955 :BUT CONTAINED WHAT IS 
11955 | 'GIVEN IN BAD RHCS2 
11957 935170 6S$: 
1168 ESEI7S O4DTT? OOODDTS 146582 SIC _ a7, RHCSL jSLEAR FUNCTION BITS 
1188 » CHECK THat RHCS] HAS SciRDY! 
{i965 03517 012737 104200 001124 HOV RSCERDY!GVA, ScoDAT VF set GOOD = 104200 
IISE3 995204 17737 146650 901126 Noy  BRHCS:SBODRT “PED RHCS1_FOR COMPARISON 
i183 B363i2 63999 Aciizss 861i5¢ che | ScpbAr, SEDDAT © :COMPARE EXPECTE 
1ise4 : :DAy g WITH DATA READ FROM 
4i383 
| 1196 035220 001401 BEOQ —s«& 7S BRGRCH IF GOOD 
141967 Osseee 104125 ERROR 125 
| iiss SAFTER SETTING “CLR” BIT #5 
| T19e9 "TN RHCS2 TO INIT THE RH Meenas 
1198 'A TWO WORD WRITE REVERSE FROM AN 
1197} ZEVEN WORD BOUNDARY Was DONE 
| 33878 silt TH BAI IN RHCS2 SET 
3874 ie SHOULD HAVE SCIRDY!DVA 
11976 IBUT CONTAINED HAT IS 
| tier? ISIVEN IN BAD RCSL 
| T197B -ogs224 575: 
| 11978 ,SHECK THAT RMCSE Has IRLOR!BAL 
11366 35224 012737 900319 001124 Ady ORISAI, $aD0AT sGET GOOD = 310 
| Lise: O3832 Os3737 308010 O01154 Bis tAtT SGDDAt » INCLUDE UNIT NUMBER 
l1lSe2 
11883 025240 917737 148624 O01126 MOV -BRHCS2,$5D°AT —; READ_RHCS2_FOR COMPARISON 
| 11984 O36e48 Des7a7 Colles SOlle6 CMP 6s SGDDAT’ SBDDAT COMPARE EXPEC 
| 385 {Gata ATTA Data REO FROM 
| 11987 36254 90140) BED =s«g 9S tBRANCH IF GOOD 
| [i988 B3E5&q_ 155136 ERROR 126 
| [1986 AFTER SETTING "CLR" BIT a5 
| 37990 1+ FIN RACES T 
| i19s7 THO ORO WRITE REVERSE FROM AN 
| tise :EVEN WORD BOUNDARY WAS DONE 
13223 HIT H BAI IN RHCS2 SET 
| 11s ERUES2 SHOULD HAVE IR!OR!BAl 
| i396? TOGETHER WITH UNIT NUMBER 
| [iéée IBUT CONTRINED WHAT IS 
11969 SGIVEN IN BAD RHCS2 
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DERNAB TR 


1 
Tél TEST thee (REESE ETT #10) TES 


;SETUP UNIT NUBER 
: CLERR RHWC AND FUNCTION SITS IN RHCS! 


12000 O3S260 $$$: 
12991 e sCHECK THAT RHWC HAS 0 
ieee 035280 Ole7s? oocd0c o01124 elt #0, $GDDAT ;GET GOOD = 0 
12094 Eepeee O1?737 =146S79 002126 MOV JRHWC , SBODAT s;READ RHWC Bene COMPARISON 
1200S O3Se74 Ces7s? 001124 0126 CMP $SDDAT, SBDDAT i SONPARE EXP 
22228 spate +N WITH AES A READ FROM 
12008 035302 501401 5EG 71$ : BRANCH IF GOOD = 
12099 O28304 10413: ERROR 13! 
leOi0 sAFTER SETTING te a 85 
1201] s1N es HCS2 TO INIT 7 
i2zdle A TWO WORD WRITE REVERSE FROM AN 
le013 ugh WORD BOUNDARY WAS DON 
1z014 WITH BAI IN RHCS2 SET 
lols THEN 
12018 SRHWC SHOULD HAVE 0 
12017 : BUT CONTAINED WHAT IS 
1i0i8 ;GIVEN IN SAD RHWC 
12013 O3S30 718: 
12020 
12021 
Le0zee 
2023 
12024 5 EAERRAREAR RRR AEEERE REAR ERE LEAL ELA ERAREARELLEAA ER AEAERALE AEE ES HF 
3255 :&TEST be TEST DBL (RHCS3 BIT 810) TEST S 
le0e :* LEAR THE SUSSYSTEM BY A CONTROLLER CLEAR (RHCS2 BIT #5) 
1202 the! SET UP FOR A NINE WORD READ REVERSE FROM AN EVEN HORD A echt 
1202 ¢% DO A NINE WORD READ REVERSE FROM AN EVEN WORD SOUNDS 
1202 2 THIS SHOULD SET RHCS3 BIT #10 DBL 
1203 -# CHECK RHCS3 
1203 2% CHECK RHEE] RHCS2, RHSA, RHBAE , RHWC 
1E23 + TE Mag’ TAPE NOT Uses. this Test IS NOT DONE 
le03 Lag 7, er rananapians mie mareminnarcr se means cee 
1e03& 935306 00200 rSts2: SCOPE 
le037 O35310 Q12e70& 001000 MOV sSTACK , SP RESET STAC 
i == Os5214 Olz737 d000&2 cOsESE MOV #62,38TSTNM :SAVE TEST NUMBER 
we 
1 24 025322 204737 o4o03ie JSR PC, aecLOISK ;GIVE RH INITIALIZE 
L204 
1204 
1le04 
1204 
120: 
120 
120; 
len 
] 
q 


TUPTOUTUTOUTOULOUTOUTOUNUITUTULTUTUTU TOPO TOTU TUTTO rUrUroruru run 


J 
On Gofue- (9.000 SR £10 00 N16 Gone CO. 90 


O38226 022737 O41710 OOMEYO CMP ss RCMNDTM,COMND «=; IS TU THERE 
03234 001102 BNE TSTE2 ©; BRANCH IF TU NOT THERE 
5 
5 ,SET UP FOR A NINE WORD READ REVERSE FRON AN EVEN WORD BOUNDARY 
S4§ 025226 91270: 900002 hoy ~~ 83, R1 ;COUNT OF THREE 
O50 36342 Olé702 003000 NOV BFEVEN, R2 :STRRT + THREE NORD BUFFER 
cE :FROM AN EVEN WORD BOUNDA 
SEE OGEHHE 012722 oOs25z25 18: MOY = wS2525,(R2)¢ — MOVE THREE S2525 INTO OPER 
582 fitise 00530! DEC ORL COUNT 
555 S35364 001374 BNE «18 SSRANCH If THREE NOT DONE 
le0ss 53536_ 012777 9032000 146500 MOV - BEFEVEN,GRHBA ©; SET BUS ADDRESS TO START 


> 


+ 0-+ 9-0 + b-+ p= bob =p « 


uruororn 
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Mrurromtrorortus 
3 
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+ 0 0 b+ 0 8 hs 0 ed +s O08 ob  B-8 0 bo ho os ho po ee 
hae oe Joo 


Cc Write tr te br tn ene eens MICNMOIOIOOOOMOOM 


rururorururururururururorororun 
000.000.0000 CoCo 00 000000 
NOT OO WONOM ULE to 
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ee ONIOOVIO0000.0.0W 
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Oler?r 
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001401 
104126 


CY l 
TEST Dsl (RHCS3 BIT 310) TES 


S:11 PAGE 226 
TS$ 


JSR RO, JCOMND 
REVRED 


;CHECK THAT RHCS3 H 
Mov #DBL , $GDDAT 

MOV JRHCS3, + $8008 
CMP SGDDAT, SBDDAT 
BEQ b5$ 

ERROR les 

BIC 876, dRHCS! 


;CHECK THat RHCS1 } 


MOV JRHCS1, SEDDAT 
CMP $GDORT , $8D0AT 


; CHECK yet pit HAS IR 


hoy SGDCAT 
BIS uatt $GDDAT 


MOV JRHCS2, SBODAT 
CMP SGODAT , $80DAT 


BEG 69$ 
ERROR 126 


FROM AN EVEN WORD BOUNDARY 
MOV 8-9. ,QRHWC ; WORD count NINE 


tREVER DO_COMMAND 
* toe OBL 
;GET GOOD = 2000 
“ee ere FOR BRO AR ISOM 
oe WITH paTA READ FROM 
jute IF GOOD 
Ae SETTING “ o 


0 NIT THE RH 
E WORD READ REVERSE FROM AN 
EVEN WORD BOUNDARY WAS DONE 


TH HEN 
sRHCS3 SHOULD HAVE DBL 


But CONTAINED WHAT IS 
;GIVEN IN BAD RHCS3 


igs eos FUNCTION SITS 
MOV BRDY!DVA,SGDDAT ;GET GOOD = 
: READ RHCS! of oR COMPARISON 
‘Fara WITH “ORTA READ FROM 
jane IF GOOD 

AFTER SETTING uit eos at 


NE REVERSE FROM AN 
EVEN Fio&D RBOUNCRRY WAS DONE 


Hi 
:RHCSI SHOULD HAVE RDY!DVA 


»=420 
:BUT CONTAINED WHAT IS 
: GIVEN IN BAD RHCS1 


SPRCLODE UNIT NUNGER 

;READ a. Ale COMPARISON 
ico TA WITH. ATR READ FROM 
ease IF GOOD 

;AFTER SETTING “CLR” BIT aS 
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DERHAB. SAC Té2 TEST ‘bal (RHCS3 BIT #10) ek S 
;IN RHCSe TO INIT THE R 
A NINE WORD READ REVERSE FROM AN 
sEVEN WORD BOUNDARY WAS DONE 
sRHCS2 SHOULD HAVE IR 
TOGETHER WITH eat NUMBER 
;BUT CONTAINED WHAT IS 
;GIVEN IN BAD RHCSE 4 
O35S1e 69$: meee”: 
;CHECK THAT RHWC_HAS 0 
035518 Jle73s7 000000 001124 MOV #0, SGDDAT ;GET GOOD = 0 
035524 O17737 146332 001126 MOV ORHWC , SBDDAT ;READ RHWC FOR COMPARTSON 
O385s2 Oe3737 OOlle4 01126 CMP $GDDAT, $BODAT ; COMPARE EXPECTE ' 
fa WITH DATA READ FROM x 
S540 0014C} SEQ 715 BRANCH IF GOOD 
035542 . 104131 ERROR 131 


AFTER SETTING a af M 85 
;IN RHCSe TO INIT THE R 

A NINE WORD READ REVERSE oo AN 
zB VEN WORD BOUNDARY -WAS DONE 


‘Ree SHOULD HAVE 0 
BUT CONTAINED WHAT IS 
:GIVEN IN BAD RHWC 


035544 718: 


tia ERT fn (ead ATT cit tr 


4 GOT O00 SIO UTE GIT O10 00 IO U1 GOT (0.000 ~ 30 U1.£ G9 O00 PU Cote 


TUPTUTUTUPOPUruUlUTUrTU NU PULUPUPUPU PUT POPU PU rorurururururnurnoru rrr ror rrr rrr ror rm rrmrorore 


Oe 8 = he he eh he Bae bw he 8 be 8 be be be be 2 2 ho 0 be 0 b= F808 8 8 ho he Be bs hho hme Fw fe hn heh 0 ho he Boh p+ b+ b= fo hae ho he he he 
COO no oP OP CP ON UNTO UT OT OT OO es ee I GI GIGI GIGIGI GIGIGIN TUN FUTUTU TD LITLE) 0 0 b= b= = = 


iT TEST 63 TEST DBL (RHCS3 BIT #10) TEST T 
:# CLEAR. THE SUSSYSTEM BY A CONTROLLER CLEAR (RHCS2 BIT #5) 
1% SET UP FOR A TEN WORD READ REVERSE FROM AN EVEN WORD BOUNDARY 
1% dO A UTEN WORD READ REVERSE FROM AN EVEN WORD BOUNDARY 
: THIS SHOULD NOT SET RHCS3 BIT #10 DBL 
:* CHECK RHCS3 
Le CHECK RHCS1,RHCS2,RHBA, RHBAE, RHWC 
:% IF MAG. TAPE NOT USED. THIS fist” IS NOT DONE 
"kala +-+-+-+ jaan ini tata iricaae iata cient 
S o3ss44 sooo +é763: SCOPE 
& 935546 612706 001000 MOV #STACK, SP ;RESET STACK 
Z 025552 612737 OCO0B3 oo4ESss MOV #63, a8 TSTNM :SAVE TEST NUMBER 
3 O25560 004737 o40312 JSR PC, J#CLOISK Se hott deer 
i CLEAR Riise AND FUNCTION BITS IN RHCSL 
2 035564 022737 O41710 OO4EHO OMP #CMNDTM, COMND fs TU THERE 
: O35572 001103 BNE  TST&4Y  ;BRANCH IF TU NOT THERE 
é Ps 
? :SET UP FOR A TEN WORD RES) REVERSE FROM AN EVEN WORD BOUNDARY 





i A SS SSS SSS SSS ss 
| 0+ b+ ob © = b+ 2 8 F822 0 «oo pe 0 b= 8-2 0 8 -* + 2 0 bo 8 ho BF fo 0 P+ Be po + fo ho pe he 
' 
; 


~- 
ot tele. I. 
GIT (9 


~gry 


fuUrururorurnumrmrmrrrrnr 
“jo” 


UD 2 b+ 8 bs b= 8 ho ht 8 hs bo bo bo bo 2 8 he 8 ha ho ho bo pe he ho bo he 
~OWM IO ULE GfurMOww 


rorurururururorurofrururururorn 
16 0 ec momma ep ~J 


r 


it 


YQNWVVIOOVOW OWOWOWO 


TUPUTUTU == 9-8 92 a9 9-9 OCI 


0+ 0-4 0-2 b= b+ b# b= bh * b= 2 8 b= * 2 b2 b* 2 hs bo he 8h 0 § 0 ho Be B- 2 ho fo ho hw he 


£400 OWO0™IMU1£ 


0+ b+ 0 < b= 0 2 & 2 8 hs 0 eb 
rorururururururururorururoruroure 
ronirorurururorofrorurfurororure 
duro 029.000 NON Gore Wo 


a ar SE NE 


035574 
035600 


035504 


035614 
025622 
035630 
O3s634 
035836 
035544 
o35652 


0355860 
Ossés= 


035664 
035654 


35672 


035720 


035720 
035726 


035734 


ate ht Ne =A 
RB.S T&3 


012701 
O1e70e 


Olere2e 
o1e777 
D1e777 


004077 
304200 


012737 


001491 
104124 


042777 


012737 


Oler. 
053737 
017737 
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009003 
003000 


o52S525 


003000 
177766 
147004 


000000 


146262 
001124 


000076 
004200 


146154 
O01124 


000100 
005010 


146130 


146242 © 


146232 


001124 


O0i1es 
001126 


146166 
001124 


001126 
001126 


001124 
001124 


O0i 126 


7 22-SEP-76 1 
TEST DBL (RHCS3 BIT #10) TES 





1 PAGE 228 


S31 
: i 


3,R1 
MOV HBFEVEN, Re 
MOV 852525, (R2)+ 


1$ 
“MOV #BFEVEN, JRHBA 
MOV #-10.,3RHWC ;WORD COUNT TEN 
369 TO_DO_COMMAND 


JSR RO, JCOMND 
REVRED 


-CHECK THAT RHCS3 HAS o 
MOV #0, SGDDAT 


MOV ORHCS3, SEDDAT 
CMP $GODAT , SBDDAT 


BEG es$ 
ERROR = 124 


#76, dRHCS1 


BIC 
-CHECK THAT RHCS1 HAS RDY!D 
MOV BRODY !DVA, SGDDAT tat *e000 = 


sREAD nae i errs COMPARISON 
A WITH SATA READ FROM 

Bucs 

BRANCH IF GOOD 

Ae ay TING 1 ne BIT #5 

:IN T_THE 


TO HE RH 
:A TEN “FORD READ REVERSE FROM AN 
;EVEN WORD BOUNDARY WAS DONE 


THEN 
FRCS SHOULD HAVE RDY!DVA 


=4 
‘BUT CONTAINED WHAT IS 
:GIVEN IN BAD RHCS1 


sCHECK THAT RHCS2 HAS IR 


MOY QRHCS1, SBODAT 
CMP $GDDAT , $8DDAT 


BEG 67$ 
ERROR 125 


Mov #1, SGODAT 
BIS uNTt: SGDDAT 


MOV ORHCS2, $BDDAT 


eee ee - ee 


se TORT OF THREE 
Bao Rafat ER on 


ioe THREE 52525 NTO NBUFFER 
BRANCH IF THREE NOT os 


:SET BUS ADDRESS TO S 
:FROM AN EVEN WORD BOUNDARY 


;READ nage eer COMPARISON 
DAT A WITH HATA READ FROM 
:RHCS3 

BRANCH IF GOOD 

Ad + SETTING fon BIT #5 
+ \ TO_INIT THE RH 


TEN WORD READ REVERSE FROM AN 
SEVEN WORD BOUNDARY WAS DONE 


:RHESS SHOULD HAVE 0 
:BUT CONTAINED WHAT IS 
;GIVEN IN BAD RHCS3 


en FUNCTION BITS 


GOOD = 100 
SFROLUDE UNIT NUMBER 
;READ RHCS2 FOR COMPARISON 








PAINE <1 1 -OERHAG™ =A 
SRC Té3 


DERHAS. 
025742 


035759 


0257. = 


MrurMMmrnrnrornrorrrnrnrn 
MWurorurororrrmrnrrornrny 
GILIGIGIGIGIGINVIUUlOTT 
“SOUL GI 00M Ul 


+ b-—< 6 + b+ 6-8 §-< b- & = + bh = pp 


035754 
035754 


036002 
036004 
036018 


C36016 





023737 


ocoo04 
012706 
012737 


004737 


MACY11 27(732) 


ee-SEP-76_ 15:11 
TEST ‘Dat (RHCS3 BIT #10) TEST T 





PAGE 229 


001124 901126 CMP $GDDAT,S$BDDAT  ;COMPARE EXPECTED 
spare WITH DATA READ FROM 
BEQ &9$ ‘BRANCH IF GOOD 
ERROR 126 
sAFTER SETTING “CLR” BIT #5 
sIN RHCS2 TO INIT THE RH 
TEN WORD READ REVERSE FROM AN 
sven WORD BOUNDARY WAS DONE 
bt SHOULD HAVE IR 
: TOGETHER WITH UNIT NUMBER 
:BUT CONTAINED WHAT IS 
a :GIVEN IN BAD RHCS2 
~""" SOHECK THAT RHWC HAS 0 
o99090 001124 MOV #0, SGDDAT :GET GOOD = 0 
146074 001126 MOV DRHWC,SBODAT =; READ RHWC FOR EQMPARISON 
§o11e4 001126 CMP SGDDAT,$BDDAT COMPARE EXP 
spare WITH DATA READ FROM 
BEG 715 :BRANCH IF GOOD 
ERROR 131 
:AFTER SETTING rua" BIT #5 
sIN N RHCS2 TO INIT Ry 
A TEN WORD RESD REVERSE FROM AN 
ne WORD BOUNDARY WAS DONE 
:RHWC SHOULD HAVE 0 
:BUT CONTAINED WHAT IS 
:GIVEN IN BAD RHWC 
713: 
1 HEHEHE HEHEHE HEHEHE EHO HEE EASE 
TEST 64 TEST DBL (RHCS3 BIT #19) TEST U 
ss s% CLEAR THE SUBSYSTEM BY A CONTROLLER CLEAR (RHCS2 BIT #5) 
:% SET UP FOR A TEN WORD READ REVERSE FROM AN ODD WORD BOUNDARY 
: % DO A TEN WORD READ REVERSE FROM AN ODD WORD BOUNDARY 
~~ st THIS SHOULD SET RHCS3 BIT #10 DBL 
# CHECK RHCS3 
¥ CHECK RHCS1,RHCS2, RHBA, RHBAE, RHWC 
: # IF MAG. TAPE NOT USED. THIS TEST IS NOT DONE 
© KEERELKEFLE LARA HALE LEEAEK AAA SHELF PEELE RSAA RS HRESRA HEARSE LESS SRE 
+é7G4: SCOPE 
001000 V #STACK, SP :RESET STACK 
090069 cO4esE MOY #64, J8TSTNM ‘SAVE TEST NUMBER 
o4021e2 PC, I#CLDISK 


JSR 


;GIVE RH INITIALIZE 
;SETUP UNIT NUBER 
; CLEAR RHIC AND FUNCTION BITS IN RHCS1 








MAINDEC- | tae , 


DERHAB. SRC 


12280 036022 d22737 
12281 


12282 036030 


2285 036032 
12287 036036 
2289 


lees9 036042 


036052 
294 036060 
O36066 
12297 936072 
12300 o36074 
12302 036102 
12303 036110 


12306 36116 
le307 036120 


1 
1 

i 

1 

i 

1 036122 
i 036122 
036120 
12352 036136 
lese3 036144 
1 

1 

i 

1 

1 

1 

1 

1 

i 


3e& 036152 
27 O36i54 


001103 


Ole777 
004077 
004200 


012737 


042777 
012737 
017737 
023737 


001401 
104125 


MACY11 27(732) 


TEST DBL (RHCS3 BIT #10) TEST U 
O41710 904640 


000003 
003002 


oS2Se5 


003002 
177766 
146546 


902000 


146024 
Odile4 


000076 
004200 


145716 
091124 


146004 
145774 


001124 


001126 
001126 


145730 
COile4 


001126 
001126 





Oe 
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CMP #CMNDTM,COMND .°;IS TU THERE 
BNE TST6S  ;BRANCH IF TU NOT THERE 


ize’ uP aoa TEN WORD ter: SUNT be TH Ree AN ODD WORD BOUNDARY 


1 
MOV fat 00D, R2 Saat THREE WORD BUFF R 
ROM AN ODD WORD BOUNDARY 
1S: NOV s52525, (R2)+ MOVE _ THREE S2525 INTO BUFFER 
UL 
BNE 1$ ge IF THREE NOT DONE 


MOV 8BFODD,JRHBA § :SET BUS ADDRESS TO START 
ROM AN ODD WORD BOUNDARY 
MOV #-10.,QRHNC ;WORD colt. TEN 


JSR RO, JCOMND ;GO0 TO DO COMMAND 
REVRED REVERSE READ 


-CHECK THAT RHCS3 HAS DBL 
MOV #DBL , SGDDAT ;GET GOOD = 2000 


MOV @RHCS3,SBDDAT  ;READ RHCS3 FOR COMPARISON 
CMP $GDDAT , SSDDAT : COMPARE EXPECTED 
;DAT A WITH DATA READ FROM 


BEQ S$ t BRANCH IF GOOD 
‘ ERROR 124 
sAFTER SETTING "CLR" BIT #5 
N RHCS2 TO INIT THE RH 
' TEN WORD READ REVERSE FROM AN 
ODD WORD BOUNDARY WAS DONE 
:RHCSS SHOULD HAVE DBL 
gut CONTAINED WHAT IS 
vn GIVEN IN BAD RHCS2 
te Oe #76, JRHCS1 -CLEBR FUNCTION BITS 
;CHECK THAT RHCS1 HAS R ROY'DVA 
MOV #RDY'DVA,SGDDAT ;GET GOOD = 4200 
MOV BRHCSL, SBDDAT  ;READ RHCS1 ofa COMPARISON 
CMP SGDDAT;$BDDAT  :COMPARE EXP 
spare aiTH ABTA READ FROM 
BEG &7$ :BRANCH IF GOOD 
ERROR 125 
;AFTER SETTING "CLR" BIT 8S 
sIN N RHCS2 TO INIT 


TH 
A TEN WORD READ REVERSE FROM AN 
900, ORO BOUNDARY WAS DONE 


;RHCS1 SHOULD HAVE RDY!DVA 
‘BUT CONTAINED WHAT IS 











at AB. 


15381 


03&156 


936155 
036164 


036206 
036210 


036212 
03621 

036220 
O3&226 


036234 
036236 


036240 


A -11-DERHAB-A 
SRC T&4 


Ole737 
053737 


017737 


- 023737 


091401 
104126 


012737 
017737 
023737 


00i4%01 
104131 
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TEST OBL (RHCS3 BIT #10) TEST U 


;GIVEN IN BAD RHCS1 


&7$: 
;CHECK THAT RHCS2 HAS IR 
990100 001124 MOV #IR, SGDDAT :GET GOOD = 100 
oe50!:9 oo:124 BIS UNIT. $GDDAT ‘INCLUDE UNIT NUMBER 
145672 001126 MOV DRHCS2,$8DDAT  ;READ RHCS2 FOR COMPARISON 
Ociie4 o0li26 CMP $GDDAT;$BDDAT  ;COMPARE EXPECTED 
pare sHITH DATA READ FROM 
BEQ 69% ‘BRANCH IF GOOD 
ERROR 126 
sAFTER SETTING “CLR” e17 aS 
IN RHCS2 TO INIT THE R 
tA TEN ORD READ REVERSE FROM AN 
00D WORD BOUNDARY WAS DONE 
tRHCS2 SHOULD HAVE IR 
TOGETHER WITH UNIT NUMBER 
:BUT CONTAINED WHAT IS 
ie GIVEN IN BAD RCS 
: =CHECK THAT RHWC HAS 0 
opc009 901124 MOV #0, SGDDAT ;GET GOOD = 0 
145636 001126 MOY DRHWC,SBODAT § ;READ RHWC FOR COMPARISON 
doi12e4 01126 CMP $GDDAT, $BDDAT : COMPARE EXP 
3A TA WITH DASA READ FROM 
BEQ 713 BRANCH IF GOOD 
ERROR 131 
sAFTER SETTING "oLR" eI #5 
tIN RHCS2 TO INIT THE R 
=A TEN WORD READ REVERSE FROM AN 
3900 Hod BOUNDARY WAS DONE 
pts SHOULD HAVE 0 
:BUT CONTAINED KHAT IS 
‘GIVEN IN BAD RHWC 
718: 
© SRKLEEKHA LS KEL KHER SEALERS RK ARRAS SEALERS LAR RRRARAA RARER RHSATHEE 
ET TEST 65 TEST DBL (RHCS3 BIT #10) TEST V 
:# sop THE SUBSYSTEM M BY A ONTROLLER CLEAR (RHCS2 BIT #5) 
re SE FOR A ELEVEN WORD READ REVERSE FROM AN EVEN WORD. BOUNDARY 
* DO A ELEVEN WORD READ REVERSE FROM AN EVEN WORD BOUNDAR 
i THIS SHOULD SET RHCS3 BIT #10 DSL 
t* CHECK RHCS1,RHCS2, RHBA, RHBAE, RKWC 
1% IF MAG. TAPE NOT USED. THIS TEST IS NOT DONE 


ional $f RERREREKERE REE RAE AREER AR RE REAR RARER EEE RERERRRR ERE RA RRR RA RRER 
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TEST DBL (RHCS3 BIT #10) TEST V 






MAINDEC-11-DERHAS-A 
DERHAB. SRC T6S 






12392 026240 000004 TSTES: SCOPE 

12393 036242 Ole706 001000 MOV #STACK,SP ;RESET_ STACK 

1e3ae 036246 Ole737 000065 O04656 MOV #65, aaTSTNM :SAVE TEST NUMBER 

1239S 036254 O04737 O403le JSR PC, d#CLDISK i GIVE RH INITIALIZE 

12397 ;SETUP UNIT NUBE 

12398 s CLEAR RH AND FUNCTION BITS IN RHCS1 
12399 036260 022737 O41710 004640 CMP #CMNDTM,COMND ;IS TU THERE 













12491 036266 901103 BNE TST6& $;BRANCH IF TU NOT THERE 





i244 ;SET UP FOR A ELEVEN WORD nat oe FROM AN EVEN WORD BOUNDARY 
MOV ;COUNT OF THREE 












1e40S 036270 012701 O00083- #3,R1 

12406 O36274 Ole70e 003000 MOV SSPEVEN, Re :START THREE WORD BUFFER 
12407 :FROM AN EVEN WORD BOUNDAR 
1e408 036300 OQOle7ee O525eS 1§: MOV #52525, (R2)+ sMOVE THREE S2525 INTO BUFFER 
1e409 936304 905301 DEC Rl : COUNT 
12410 036306 001374 +. NS 1$ ;BRANCH IF THREE NOT DONE 
ie4i1 036310 012777 003000 145546 MOV #BFEVEN,JRHBA ;SET BUS ADDRESS TO START 
le4le :FROM AN EVEN WORD BOUNDARY 
taata O36316 012777 177765 145536 .— MOV #-11.,QRHWC ;WORD COUNT ELEVEN 

1e4iS 036324 04077 146319 JSR RO, JCOMND ;GO TO DO COMMAND 

suis 038230 004200 REVRED REVERSE READ 








12418 ;CHECK THAT RHCS3 HAS DBL 
1e419 036332 012737 O02000 001124 MOV #DBL , SGODAT ;GET GOOD = 2000 








12430 

12421 036340 017737 145565 001126 Moy QRHCS3, SBDDAT READ. RHCS9_FOR_COMPARTSON 

12422 036346 023737 Golie4 o01126 CMP §GDDAT:$BDDAT  :COMPARE EXPECTE 

12423 :DATA WITH DATA READ FROM el 
12404 :RHCS3 

12425 036354 001401 BEQ sé :BRANCH IF GOOD 








le#e6 036356 104124 ERROR 124 

leve7 ; AFTER a5 TING “CLR” BIT #5 

le4e2 IN RHCSe T HE RH 

le4e9 ; A ELEVEN WORD READ REVERSE FROM AN 
12430 SEVEN WORD BOUNDARY WAS DONE 






HEN 
12432 tRHCS3 SHOULD HAVE DBL 











12434 BUT CONTAINED WHAT IS 
12435 :GIVEN IN BAD RHCS3 te 
12436 936360 65S: if 
12437 036360 042777 OOOO7E 145472 BIC 876,0RHCS1 sCLEAR FUNCTION BITS 
12438 “CHECK THAT RHCS1 tps fo Roy! tDvR 
1e423 O36366 012737 ocO4e09 o01124 Moy #RDY! DY AT ;GET GOOD = 4200 
o& 
12441 036374 017737 14S460 001126 MOV DRHCS1,SBDDAT  ;READ RHCS1 af OR COMPARISON 
le442 036402 023737 O0112e4 OOl1le6 CMP $GDDAT;SBDDAT  :COMPARE EXP 
Re". Be, ‘DATA WITH BATA READ FROM 
1e444 *RHCS1 
1445 O2641C 901401 BEG 67S ‘BRANCH IF GOOD 
1DH4E «OBE41e 04125 ERROR 125 


;AFTER SETTING “CLR” BIT #5 
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MATNDEC-i1-DERHAB-A 
T6S | TEST DBL (RHCS3 BIT #10) TEST V 


DERHAB. SRC 









12448 ;IN_RHCSe TO INIT THE R 

12449 sA ELEVEN WORD READ REVERSE FROM AN 
12450 SEVEN WORD BOUNDARY WAS DONE 

12451 me : THEN 

12452 ;RHCS1 SHOULD HAVE RDY!DVA 












12454 | BUT CONTAINED WHAT IS 
12455 : GIVEN IN BAD RHCS1 

1e455 036414 67$: 

12457 ;CHECK THAT CHR E HAS IR 

1e4S8 036414 Ole7s7 000100 001124 MOV #IR, $GDDAT ;GET GOOD = 100 

He, O36422 953737 005010 o01124 ) BIS UNIT, $GDDAT INCLUDE UNIT NUMBER 

4c E = 

12461 036430 017737 145434 001126 MOV MRHCS2,SBDDAT  ;READ RHCS2 FOR COMPARISON 
le462 036435 Oe3737 OO1le4% O01126 CMP $GDDAT,$BDDAT  ;COMPARE EXPECT 

12463 :DATA WITH DATA READ FROM 
12464 :RHCS2 

12465 036444 001401 BEQ 693 BRANCH IF GOOD 

12466 O36446 104126 ERROR 126 

12467 ;AFTER SETTING “CLR” BIT #5 
12468 “IN RHCS2 TO INIT THE RH 
12469 A ELEVEN WORD READ REVERSE FROM AN 
eer aBvER WORD BOUNDARY WAS DONE 









ee sRutse SHOULD HAVE IR 

é 

12474 : TOGETHER WITH et NUMBER 
12475 BUT CONTAINED WHAT IS 
12476 ;GIVEN IN BAD Rucse 

1e477 036450 698: 

12478 ;CHECK THAT RHWC HAS O 

EHS 036450 012737 000000 001124 Mov #0, SGDDAT ;GET GOOD = 0 

1e481 O364S6 017737 145400 001126 MOY QRHWC, SBDDAT ;READ RHWC oon. COMPARISON 
1e4%8e 036464 023737 O0112e4% 001126 CMP $GDDAT,SBDDAT  ;COMPARE EXP 

12483 ;DATA WITH SATA READ FROM 










12484 

1e485 036472 901401 BEG 71$ BRANCH IF GOOD 

12485 036474 104131 ERROR 131 

12487 ;AFTER SETTING “CLR” fi #5 
12488 :IN RHCSe TO INIT TH 

12489 iA ELEVEN WORD READ REVERSE FROM AN 
12490 ; EVEN WORD BOUNDARY WAS DONE 
12491 ; THEN 

12492 sRHWC SHOULD HAVE 0 

12493 :BUT CONTAINED WHAT IS 

12494 GIVEN IN BAD RHIC 

e495 036476 718: 







12439 5 HERR KER ERK ARKERAE EH RL ERK RAKE LEAKE AAA ER AE RARE KERR EAR RA RARER RE 
12500 TEST 66 TEST DBL (RHCS3 BIT #10) TEST W 


12502 7% CLEAR THE SUBSYSTEM BY A CONTROLLER CLEAR (RHCS2 BIT #5) 
12503 7% SET UP FOR A ELEVEN WORD READ REVERSE FROM AN ODD WORD BOUNDARY 
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DERHAB. SRC T66 TEST DBL (RHCS3 BIT #10) TEST W 


DU A ELEVEN WORD READ REVERSE FROM AN ODD WORD SOUNDARY 
att Ba SHOULD NOT SET RHCS3 BIT #10 DBL 


CH 
CHECK RHCey RHCS2, RHBA, RHBAE , RHWC 
IF MAG. TAPE NOT USED. THIS TEST IS NOT DONE 


: Loy t) epeeereenymemanepe rtm: 


036476 000004 
036500 0127068 001000 MOV #STACK, SP ;RESET_ STACK 
036504 Ole73? OO0066 OO46S6 MOV #66, a8tSTNM :SAVE TEST NUMBER 


036512 9304737 040312 JSR PC, J#CLDISK ;GIVE RH INITIALIZE 
:SETUP UNIT NUBER 
a :CLEAR RHWC_AND FUNCTION BITS IN RHCS1 
036515 O2e737 O41710 OO464O #CMNDTM,COMND ;IS TU THERE 


036524 001103 TST67 =; BRANCH _ IF TU NOT THERE 


FOR A ELEVEN WORD READ REVERSE FROM AN ODD WORD BOUNDARY 
036526 Ol2701 900003 ;COUNT OF THREE 


#3,R1 
O3653e Ole70e 003002 #3000, Re s START Aly: sete BOT ASaRy 
036536 Ole7ee OSe5e5 : | Apeateeils OVE THREE SeS25 INTO BUFFER 


1$ ‘BRANCH IF THREE NOT DONE 
O36546 O12777 CO300e 145310 #BF ODD, JRHBA SET BUS ADDRESS TO START 
FROM AN ODD WORD BOUNDARY 

036554 012777 177765 145300 #-11.,ORHWC ;WORD COUNT ELEVEN 


036562 14€052 JS RO, JCOMND ;G0 TO DO COMMAND 
036566 VRED REVERSE READ 


;CHECK THAT RHCS3 HAS 0 
036570 ccosso o01124 Mov #0, $GDDAT ;GET GOOD = 0 


036576 145320 CO0lle6 MOV @RHCS3,$B8DDAT ;READ aie A COMPARISON 
036504 O0ile4 OO01126 CMP $GDDAT,$B0DAT  ;COMPARE EXP 
DA TA WITH a READ FROM 


H 
O3561e BEQ 6S$ BRANCH IF GOOD 


036614 ERROR 124 
; AFTER SETTING "CLR" BIT #5 
IN RHCS2 TO INIT THE RH 
3A ELEVEN WORD READ REVERSE FROM AN 
3000 WORD BOUNDARY WAS DONE 


RHeS3 SHOULD HAVE 0 
sei CONTAINED WHAT IS 
GIVEN IN BAD RHCS3 
036616 


6S$: 
036616 042777 OCO0076 145234 BIC #76, dRHCS1 ; CLEAR FUNCTION BITS 
CHECK THAT RHCS1 HAS A 
036624 012737 o04200 001124 HOV #RDY! DVA, SGDDAT. ret GOOD = 4200 


038632 017737 i4See2 O0ile6 MOV MRHCS1,$BDDAT  ;READ RHCS1 FOR COMPARISON 











we 
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DERHAB. SRC T&S TEST DBL (RHCS3 BIT #10) TEST W 


60 026640 023737 001124 01126 CMP $GDDAT , $BDDAT tone EXPECTED 
61 DATA WITH DATA READ FROM 


:RHCS1 

BRANCH IF GOOD 

; AFTER SETTING fh SIT af 
N_RHCS2 TO INIT THE RH 

a NECEVEN WORD READ REVERSE FROM AN 

$908 WORD BOUNDARY WAS DONE 

;RHCS1 SHOULD HAVE RDY!DVA 


BUT CONTAINED WHAT IS 
GIVEN IN BAD RHCS1 


;CHECK THET RHCS2_ HAS IR 

















036646 O00 
1C 


1 BEQ 673 
03650 5 ERROR 125 












03665< $7$: 







O366Se Ole737 000100 001124 MOV #°R, SGDDAT ;GET GOOD = 100 

036660 053737 005010 001124 Bis UNIT, SGDDAT INCLUDE UNIT NUMBER 
OS6666 017737 145176 001126 MOV @2HCS2,S8DDAT  ;READ RHCS2 FOR COMPARISON 
036674 023737 O0112e4 O0ileb CMP $GDDAT,$BDDAT  ;COMFARE EXPECTE 






sDAT @ WITH DATA READ FROM 


H 
036702 001401 BEQ £98 t BRANCH IF GOOD 
035704 104126 ERROR 126 
;AFTER SETTING “+ ah, © #5 


IN RHCS2 TO INIT T 
3A ELEVEN WORD READ. REVERSE FROM AN 
3009 ORD BOUNDARY WAS DONE 


sRHCS2 SHOULD HAVE IR 
: TOGETHER WITH UNIT NUMBER 


Sout CONTAINED WHAT IS 
;GIVEN IN BAD RHCS2 












036706 69S: 
;CHECK THAT RHWC_HAS 0 
036706 012737 O00000 001124 MOV #0, SGDDAT ;GET GOOD = 0 






036714 917737 145142 001126 MOV RHWC , SBODAT ;READ RHWC oon COMPARISON 
036722 023737 OOlle4 OO01le6 CMP CODAT,SBDDAT  ;COMPARE EXP 
sDATA WITH DATA READ FROM 






W 
036730 001401 BEQ 71$ BRANCH IF GOOD 


036732 104131 ERROR 131 
sAFTER SETTING TOUR’ BIT 8S 
N RHCS2 TO INIT THE RH 
A ELEVEN WORD R aD " \BEVERSE FROM AN 
fo WORD BOUNDARY 


Ree SHOULD HAVE 0 
Neate" © 






at 036734 718: 
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HRS. SRC Téss EST OBL (AHCS3 PIT #!0) TEST W 
12818 
l2e1r bp RRREREEALERRERR ERAS EREEESREREE ERESAEEASERESEL SESE LEER SESS SEES 
12518 seTEST $7 TEST OBL (RHCS3 BIT #10) TEST x 
4543 
ie620 3% CLEAR THE SUBSYSTEM BY A CONTROLLER CLEAR (RHCS2 BIT #5) 
lesz! :* SET UP FOR R TEN WORD READ REVERSE FROM AN CUD WORD SOUNDARY 
les2e :# WITH BAI IN RHCS2 BIT #3 SET 
leb23 te DO_A TEN WORD REAO REVERSE FROM AN 90D WORD BOUNDARY 
lese4 :* THIS SHOULD NCT SET RHCS3 BIT #10 OBL 
12625 7* CHECK RHCS3 
t2626 3% CHECK RHCS1,RHCS2, RHBA, RHBAE, RHC 
138E2 :* IF MAG. TAPE NOT USED. tHIS TEST IS NOT DONE 
12629 5p SRRRRARARERARERREREARALE LE LER ALLEL ERE ELE LE LEA ARE REESE SESE RSL ASS 
12830 036734 009004 TSTS7: SCOP ree 
12831 O36738 O12706 901000 MOV aSTACK, SP sRESET STACK 
1gPae O367%2 S1e7s? 00M? oo4sse MOV #67, aafSTNM sSAVE TEST NUMBER 
L2634 036750 004727 O4C3l2 JSR PC, adeCLOISK 3GIVE RH INITIALIZE 
12635 :;SETUP UNIT NUBER 
18636 sCLEAR RHWC AND FUNCTION SITS IN RECS! 
a O3t7Ss Of2737 OS1712 oOsE4O CMP SCMNDTM,COMND ;:IS TU THERE 
1¢e37 O3E7&2 00110 SNE TST70 ;BRANCH IF TU NOT THERE 
12640 
less) 
lzése2 »SET UP FOR & TEN WORD READ REVERSE FROM GN ODD WORD SOUNDARY 
l28$2 O38764 12701 OOOoGa=.  . : MOV a3.R1 sCOUNT OF THREE 
Le644 036770 Ole70= 003002 MOV s2FODD, Re ;START THREE WORD SUFFER 
Leb45 :FROM AN OOO WORD BOUNDARY 
12645 O36774 Ole722 OSeSes 18: MOV #52525, (Re}+ sMOVE THREE S2eS25 INTO 3UFFER 
$2647 037000 005301 DEC Ri s COUNT 
Les48 037002 001374 SNE 1$ BRANCH IF THREE NOT DONE 
12649 037004 O12777 003082 145052 MOV 38FODD, SRH8A :SET BUS ADDRESS TO START 
12555 ;FR0M AN OOD WORD SOUNDARY 
12651 037012 012777 177766 145042 MOV #-10.,aRHWC ;WORD COUNT TEN 
1sPes 027525 852777 800015 145542 BIS sBAI,akHCS2 ;SET BAI IN RHCS2 
1265 
1e654 037026 OO8N077 145606 JSR RO, JCOMND 3G0 TO DO COMMAND 
‘Seep C370se O004e00 REVRED REVERSE RERD 
lzes 
1e657 CHECK THAT RHCS3 HAS 0 
Sree 037034 612737 900000 091124 MOV #0, $GDDAT GET GOOD = 0 
py =< we 
L26&D .37D82 O17737 145064 OOLLZE MOV JRHCS3,SEDDAT ;READ RHCS3 FOR COMPARISON 
12661 Os70S5 23737 OOl1l24 OdOlicét CMP SGODRT,SSODAT ;COMPARE EXPECTED 
Letbe sDATA WITH DATA READ FROM 
lesés sRHC 
le664 O3705E 00140 BEG 55$ ;BRANCH IF GOOD 
1e665 037060 104124 ERROR 124 
| Jebse RASTER SETTING “CLR” BIT 8S 
| 2E5&7 sIN RHCS2 TO INIT THE RH 
L2668 3A TEN WORD READ REVERSE FROM AN 
| TEEES :00D WORD SOUNDARY WAS CONE 
12672 sWITH BAI IN RHCS2 SET 
| 12673 THEN 
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;RHCS3 SHOULD HAVE 0 
:BUT CONTAINED WHAT IS 
GIVEN IN BAD RHCS3 


BIC 876, 3RHCS1 sCLEAR FUNCTION BITS 
;CHECK THAT RHCS1 HA RDY!OVA 
MOV BROY!DVA,SGODAT ;GET GOOD = 4e00 


MOV JRHCS1, $BO0AT ae RHCS1 pee COMPARISON 
CMP $GDDRT,S8DDAT ;¢ tas EXP 
fel A WITH Sap READ FROM 


RHCS} 
67S ; BRANCH IF GOOD 


a 
RROR 125 
ody SETTING “CLR” a M #5 
N_RHCS2 TO INIT THE RH 
a TEN WORD READ REVERSE FROM SN 
$000 WORD SOUNDARY WAS DONE 
eit BAI IN RHCS2 SET 


: RCS SHOULD HAVE RDY!DVA 


SLT CONTAINED WHAT IS 
:GIVEN IN BAD RHCS1 


: CHECK THe Ruose HAS _IRIBAL 
hoy SIR'SAI,SGODAT :GET GOOD = 110 
BIS. UNIT, sahDaT INCLUDE UNIT NUMBER 


MOV @RHCSE,SSODAT ;READ micas FOR COMPAR T SON 


eMP $GODAT,$8008T  ;COMPARE EXPES 
DATA WITH DATA READ FROM 


Pee 69S i BRaACH IF GOOD 


OR 1é6 
;AFTER SETTING 7h fl aS 
SIN RH .. TO_INIT 
38h TEN WORD READ REVERSE FROM AN 
:00D WigkD BOUNDARY WRS DONE 
iatTe BAI IN RHCS2 SET 


iRatae SHOULD HAVE IR!BAI 
STOSETHER WITH UNIT NUMBER 
BUT CONTAINED WHAT IS 
“GIVEN IN BAD RHCS2 


;CHECK THAT RHWC HRS 0 


hoy 80,$GDDAT :GET G00D = 0 
MOV DRHWC.$ $0087 :READ RHWC FoR COMPARISON 
CMP $cDDAt, a5n0 3 COMPARE EXPECTED 

RT Mi WITH DATA READ FROM 
BEG 718 RANCH IF G00D 
ERROR 131 
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0 22°97 


‘owe 


pacene 


037420 
CS7 424 


937432 


Omoor-m 


O13746 
104402 
19440! 
630421 


013746 
104405 
194401 
000402 


o37222 


OOSS18 
OGSSO& 


005436 
037302 


004080 
037336 
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(RHCS3 BIT #10) Sed x 
RE TER SETTING "CLR" 81 BIT #5 
if TEN iid R Mi REVERSE FROM AN 
-ODD WORD BOUNDARY WAS DONE 
HIITH BAI IN RHCSe SET 
RWC SHOULD HAVE 0 
*BUT CONTAINED WHAT IS 
. ?GIVEN IN BAD RHWC 
‘ 1$: 
o* STSESSSRLSSESLSESSSSEESLESELFFLSESESESSRSELAEREFLSESSRELSF LEASE SLFFLSSE 
:&TEST 70 END OF ONE RH 
> i THIS IS THE END OF TEST FOR ONE RH 
:* IF THERE ARE MORE RH THEN THE PROGRAM 
:# JUMPS TO TEST 2 FOR NEXT RH TEST 
:* END PASS IS REACHED ONLY AFTER ALL RH ARE COMPLETE 
ON gage 1 Soon sn agua tt la i emai iumeinnc fe bachy ce 
+5770: SCOPE 
oo1212 MOV 81, $TIMES 100 1 ITERATION 
CLR ps’ RET EINSTATE PS TO 0 
TYPE &5$ $3 eine ASCIZ STRING 
gf 4g :GET OVER THE ASCIZ 
pigS$: -ASCIZ ¢18><12>/€ND OF tEST FOR RH NOY 
=@3: 
MOV WORUNT,-(SP)  ;GET WORKING RH NUMBER LEFT 
MO TSTUNT Re :GET TOTHL NO OF RH FOUND 
SUB (5P)+,R2 TESTED 
ASL R> | TREK, x FoR FH. TESTED 
May FRHNM(R2),-(SP) : 
TYPOS 
TYPE 67s TYPE ASCIZ STRING 
=e Oe bes :3GET OVER THE ASCIZ 
538" 7$: .ASCIZ 7 BASE ” 
MOY RHCS1,-(SP) sTYPE BASE ADDRESS 
TYPOC > 
TYPE 695 3: TYPE RScIz STRING. 
R 3g OVER THE ASC 
jiS%s: "ASCIZ <15><12>/TOTAL NA OF ERRORS ON THIS PASS. 
HOV SERTTL,-(SP) sTYPE TOTAL NO OF ERRORS 
TYPE 71$ ; TYPE ASCIZ STRING 
R  _—-?0§ 1iGET OVER THE AaScIZ 
iizt ASCIZ <«15><le 
TYPE =, 738 : TYPE ASCIZ STRING 
| (ed 3:GET OVER THE ASC! 
44798 asci1z <1§><«12> 
‘es: 
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Baas bese 
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2 


rs ‘ 

le7ss 6 

le7ss O3T482 ied 
Le7s? 927848 o00137 
le7se O374%50 sP5355 
L733 


ee nee ee ee eee 
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CLR SERTT 
DEC WORUN 
BEQ 1$ 


J TST2 
1$: MOV TSTUNT, WORUNT 


;MAKE WORKING RH SANE 
3AS TOTAL RH 


Se 


ee 





os 
furor rt. 


oe cae coe ae 


ti Sends $74 
OM wet 


furuorururoruroro ror 
00 (29 02909 00909 35> 
B98 Q00000 
SMUNLCGITUe-O 


TUTU b= = 6 b+ 0 + +  ( 
(2 OM NM ULE GIMe-(9.0 


forororu 


rorururururuorofururufrururofrororurororururoru 
(ULE 


09.00 00.00.00 00 0000 00.00.00 00 00 00.00 00. 0000 09 GOOD 


tu 

co 

furu 
™ 


co 
fu 


GIGIGIGIGIGIGY 


ow 


0 bs ba sh 8 8 ho 2 8 Be be 8 hd 0 2 8 0 0 0 bo fh 0 0 Oho ho OF -8 = bP bs 0 Be heh 8 2 hh * he hs Bh Pope 
OwWwONOUlcoon-Ow 


rururorururururorurorurorurururure 
cococo coco wet nt tt tat mt met od 


ins ciorue 


2 -DERHAS~ -2 


woo 8 


00137 


050040 
900043 


MACY11 e7¢ 
END OF Pass ROUTI Ne 


927563 
001200 


037569 
000042 


377 
O42412 
051501 


:365$: .ASCIZ <15><12>/TIMEOUT ‘Age EURED THROUGH L 
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.S8TTL END OF PASS ROUTINE 


recerel ha peed eee vaseees tee tt 
:HNCRENENT NT IH of aoe NUMBER fe 

Y NO P BXXXXX° ta) E ax IS A DECIMAL NUMBER) 
;*IF THERES A ASONET OR GO TO 
;*IF THERE ISN’T JUMP TO S12" 


SEOP: 
SCOPE 
CLR STSTNM $3 SERS tHe TEST NUMBER 
CLR STIMES R NUMBER 0 Ap a iy 
INC SPASS 33 INCREMENT THE PASS NUMER 
BIC #100000, $PASS ;DON*T ALLOW A NEG. NUMBER 
DEC PC)+ : LOOP? 
SEOPCT: .WORD 1 
BGT SDQAGN 


3: YES 
MOV (PC)+,9(PC)+ ;;RESTORE COUNTER 
SENDCT: .WORD 1 


SEQPCT 
YPE , SENONG ss TYPE “END PASS 3” 
MOV s« $PASS, -(SP) 3SAVE SPASS FOR TYPEQUT << 
TYPOS OQ TYPE--DECIMAL ASCII WITH SIG! 
TYPE SENULL + FYee a NULL CHARACTER 
SGETH2: MOV  ge42,R0 33GET MONITOR ADDRESS 
BEQ _  SDORGN :;BRANCH IF NO MONITOR 
RESET 3;CLEAR THE WORLD 
SENDAD: JSR PC, (RO) 33G0 TO MONITOR 
NOP ;SAVE ROOM 
NOP 33FOR 
NOP s;ACTLL 
SDOAGN: 
IMP Q{PC)+ ; ;RETURN 
SRTNAD: WORD TESTE 


SENULL: .BYTE -1,-1,0 sNULL CHARACTER STRING 
SENONG: [ASCIZ <1é><12>/EnD pasé’ a” 


-SBTTL SUBROUTINES 


yj EARHREAPAARAERE RA REAEAL RARER AREER ERA ARALRERALARRE AREER ALE RE EERE 
3% THIS ROUTINE HANDLES TIME OUT TRAPS THROUGH LOC. 4 
bp RRARAERARER RARER ELARERERAARE REEL ERE RRR ER RAREARARREARREAARER ARES 


TIEOUT: 
TYPE 65$ 3 TPE AY te a TRING 
B 4 ASCIZ 
OCATION 4 FROM PROGRAM PC- 
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037736 
037736 
037742 


040050 
040970 


040154 
040220 
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SUBROUTINES 


162716 


ease 


017746 
04402 
00137 


o00CIe 


03771 


043120 


037744 |. 


040010 


o00cse 


040052 


040100 


145350 
040155 


145270 
040234 


145214 
043120 


OOO 
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S4$: 
Sus #2, (SP) :TYPE PC 
tyPE™ 7$ YPE ASCIZ STRIN 
At abs at Tov A tue etfs 
iig?s: LASCIZ << 15><12>/PSW WAS 


TYPOC 
JMP $SCOPE. ;RETURN TO TEST . 


© SELES E RELEASE FREFE ARE RESER SELL ESRRAELELA LF EREEA ELE REAR E ALLEL FTES 
4 THIS ROUTINE HANDLES PARITY ERRORS 
© KHLSKEKESL SELAH ELE LASSE ALLE LARA AA LARS HLASERARAR FLERE SLAF EASSAE 


BARITY | 
Be mummy a Oe 
-:65$: .ASCIZ Th eenrts +i857 THRU vectoR 114/ 


TYPE 675 s3TYRE ASCIZ STRING 
BR bes {GET OVER THE ASCIZ 
53678: "BSCIZ <15)<12>/FROM PROGRAM PC) / 


bé 
SuB #2, (SP) :TYPE PC 
TYPOC 
TYPE 69$ gt ASCIZ STRING 
BR 8¢ OVER THE ASCIZ 
i638: SASCIZ §«<15><12>/PSW was”’ 
: TYPOC 
TYPE 713 $3 TYPE ASCIZ STRING 
gR $$ T OVER THE ASCIZ 
i718: SASCIZ <15><1>/HIGH crebi” SnpRe ee REGISTER 
Jd: 
NOV DHERADD, - (SP) :TYPE HIGH ERROR 
TYPE 73$ ssTYPE. asclz STRING 
== 725 :GET OVER THE ASCIZ 
i738: "ASCIZ <15)<12)/LOW ERROR ADDRESS REGISTER 
; HOV DLERADD, -( SP) sTYPE LOW ERROR 
TYPE 755 s;TYPE ASCIZ STRING 


QR ous OVER THE ASCIZ 
i7s8: "ASCIZ <15><12> MEMORY SYSTEM ERROR REGISTER 


MOV OMEMERR , -( SP) 
JMP $SCOPE 





i dideepestnaininesbtiietsiath ————E - - ~ ee OOOO 





picnpamnainiiesinltnainetine 
MAINDEC-11-DERHAB-A_ = MACYLL 27(732) 22-SEP-76 15:11 PAGE 242 
DERHAS. SAC SUSROUTINES 
12902 
13903 
13904 
Legos 
ea 
13902 40312 O12777 SoGuNO 143550 CLDISK: MOV #CLR, SRHCS2 ;CLEAR_ALL REG. 
1eg03 Subseo isco BbsL 143542 MOY DHUNIT. ORHCS2 © ;REINSTATE UNIT NO. 
12915 040326 O4e777 O00077 143524 BIC #77, JRHCS1 ;CLEAR FUNCTION BITS 
12811 D434 OosorT? 143522 CLR = ARHWIC ;CLEAR RHUC 
12912 040340 000207 RTS = PC 
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MAINDEC-11-DERHAB-A MACY11 27(732) 
DERHAB. SRC SUBROUTINES 






12313 
12914 

i 

12917 ;THIS CHECKS DEVICE AVAILABLE (DVA) AND READY (ROY) _IN RHCS1 ih her: 

129193 “AND CHECKS MEDIUM ON LINE (MOL), DEVICE PRESENT (DPR), DEVICE READY (DRY) IN RHDS 
15319 o40342 900000 Perse: 9 :PC OF JSR 

12920 

12921 




















13923 
1924 040344 211837 O4O34e< _ - CHECK: MOY (SP). DRPCISR AVE PC OF JSR+4 

tSgs¢ fussed 762585 Bobdos ouoaue SUB aie sr ceT pC OF YE 

1eS26 040355 011346 MOV sah ~ GET RHDS1 

12927 040360 052716 00100 TS WWICSBD DONT CHECK VY BIT 

les28 040364 00406 R CHECKE {OT COMMON CHECK ROUTINE 

12929 040366 011637 o40342 CHECKT: Moy (SP), SRPCISR sSAVE PC OF JSR+4 

12930 040372 162737 O00004 o40342 SUB DRPCISR sGET PC OF JSR 

12931 O40400 011346 MOV ora (SP) :GET RHDS! & DO VV CHECK AT 38 
12832 40402 011146 CHECKC: MOV = AR1, - (SP) ;GET CSI 

12933 O40404 O42716 173577 BIC #173577, (SP) CLEAR UNWANTED BITS 
12934 O4041G 022726 004200 CMP = wD VAERDY, (SP)+ HCS1 SHOULD HAVE DEVICE AVAILABLE 
12935 AND BE READY 

12936 40414 001403 BEQ 38 :BRANCH IF GOOD 

12937 O49416 011137 001122 MOV 9R1, 2#SSDADR ;BAD DATA REGISTER (RHCS1) 

16938 O4O422 104062 ERROR 62 RHCS1 DID NOT HAVE DEVICE 

12939 SAVAILABLE RIGHT AT THE START 
12940 SALL OTHER BITS SHOULD BE 9 

12941 O4O424 O42715 102000 38: BIC —-WATAILBT, (SP) CLEAR UNWANTED BITS 
1e942 040430 O22726 010700 CHE = NOLIDPRIDRY! VV, (SP)+:RHOSI SHOULD HAVE THESE SET 
12943 040434 001403 BeOS 7S "BRANCH IF GOO 

12644 040435 011337 001122 MOV. 9R3,aa$B0ADR  ;BAD_DATA_IN REGISTER (RHDS1) 
1eg45 O4O442 104061 ERROR 61 _— GRHDSL HAS SOME BITS OTHER 

12946 eta | MOL, DRY, DPR, VV SET 

12947 FALL OTHER BITS SHOULD BEC 

fesse OHOH4Y 000207 73: RTS PC SRETURN TO TEST NO. 
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O4O44E 
O404S0 


040562 


O405E4 


040566 


040572 


040600 


SUBROUTINES 


177777 


10046 


O1006E 


005737 


104135 


000427 


013703 
033777 
001421 


Bs 
fa +a 


000004 


oo0004 


OO4E46 


O4O44E 
004672 


O4YOS4S 
004672 


144110 


O4O44E 
OO467¢2 


MACY11 27 


BNE 3$ sBRANCH IF YES 
Dec R2 ‘COUNT IF REGUIRED BIT NOT THERE 
MOV DaTIMCNT, RB ;SECOND COUNT DOWN FROM 177777 
144122 23: BIT DBWAITBT, IWAITRE ;1S REQUIRED BIT THERE 
BNE 3$ sBRANCH IF YES ? 
bees SCOUNT IF REQUIRED BIT NOOT THERE }] 
001126 MOV SWAITRE, IRSBDDAT ; REGISTER CONTENTS FOR TYPEOUT dy 
ERROR 135 ;WAS WAITING FOR A BIT TO SET 
*BIT'IN QUESTION IS IN “SIT WAITED” 
REGISTER | IN QUESTION IS IN “REG ADDR" 
BR 33 : BRANCH 
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om IS A wa * ial WHEN NO P-CLOCK IS AVAILABLE 
4 







Q REGISTER ADDRESS 
D FOR 


Tes: 





:R3- IS A TEMPORAM 


TIMCNT: 177777 ;COUNT FOR WAIT LOOP 











WAIT.T: 

MOV RO,-(SP) ; PUSH RO ON STACK 
MOV RS, = (SP) ?:PUSH R3 ON STACK 
MOV tho HAS ADDRESS OF NEXT LOCATION 
MOV ag, aeliatTPc sHAT PC +2 1S IN WAITPC 

OO4EES SUB. AITP :WAT PC IS IN WAITPC 
MOY - sco) SHuatTRE ‘WAIT oN REGISTER ADDRESS 
MOV 0)+,d8WAITBT :W 
MOV RO CaP) RESTORE RETURN ON STACK 





: THIS HAS THE TWO COUNT DOuNs FROM 177777 
FOR WAITING FOR A BIT TO SET 
tsT ATO sWAITING FOR 1? 

ug ;BR ANCH IF WAITING FOR 0 
Nov JETIMCNT,R3 





;R3_ HAS TEMPORARY COUNT 
DHWAITET, AWAITRE ;1S REQUIRED BIT THERE 






144142 18: 















;THIS HAS THE TWO COMNT TO RESET 177777 








‘FOR WAITING FOR A BIT 
4g: Mov DSTIMCNT,R3 °R3 HAS TEMPORARY COUNT 
144070 S$: BIT JBWAITBT, INAITRE :1S REQUIRED BIT THERE 
BEQ 3$ BR RANCH IF 
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095303 


104136 


917737 


O4C4HE 


004672 144050 6§: 


144036 001126 


144026 O0il26 


33: 
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;COUNT IF REQUIRED BIT NOT THERE 


TIMC ;SECOND COUNT ‘eae FROM 177777 
warren AAITRE’ BRANCH ae ae BIT THERE 
: COUNT TF Reo REQUIRED BIT NOOT THERE 


WAITRE, J#SBDDAT ; REGISTER CONTENTS FOR TYBEQUT 
3 :WAS WAITING FOR A BIT TO RESET 
iBT ik QUESTION IS IN “BIT WAITED” 
ReGLs TER IN QUESTION IS IN “REG ADOR™ 

QWAITRE, IBSBDDAT’ :REGISTER CONTENTS FOR TYPEOUT 


(SP)+,R3 5 BOP TACK NTS R 
(SP)+:R0 ;POP STACK INTO _R 





t AETURN TO MAIN TEST 
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000422 
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;HERE IS 9 DETAILED EXPLAINATION OF HOW THE LOOP ON os WORKS. 
ON HITTING AN ERROR IF THE LOOP ON ERROR SWITCH IS Bet THE 
:PROGRAM GOES BACK - USUALLY BACK TO THE BEGINNING OF THE TEST. 


; WHEN THIS OPERATOR SELECTABLE SCOPE LOOP IS USED THEN THE POINT 
; THE PROGRAM GOES BACK TO CAN CHANGED. 
:THE RESTRICTIONS TO THE POINT WHERE THE PROGRAM CAN GO ARE: 
:1. IT MUST BE WITHIN THE TEST UNDER CONSIDERATION 
32. LOOP ON ERROR SWITCH MUST BE SET 
HE ERROR MUST OCCUR WITHIN ie Ma! UNDER CONSIDERATION 
NOT OCCUR WITHIN THE attee. UNNOWEVER. TF LOOP. ON 


HO 
oO 
wrem 
m wy 
S 


S ITCH IS SET AND T 
‘THEN THE EPOGRAN WILL LOOP BACK TO THE SELECTED POINT WHEN IT 
; COMES TO THE END OF THE TEST UNDER CONSIDERATION. 


t AFTER LOOPING FOR SOME TIME IF THE LOOP SWITCH IS PUT DOWN THEN 
;NORMAL OPERATION WILL CONTINUE. 


















TESTAD: O ;FIRST ADDRESS OF TEST 
OPERSEL: 
CLR PS ;MAKE PROCESSOR STPTUS ZERO 
045100 MOV #-1, JAPRITEM sCLEAR PREVIOUS ITEM NUMBER 
TYPE 65$ TYPE ASC i STRING 
BR 4g “GET OVER THE ASCIZ 
~ piss: SASCIZ <15><12>/THE probit WAS IN TEST NUMBER / 
MOV QRTSTNM,-(SP)  ;GET READY TO TYPE TEST 
TYPOC : NUMBER 
TYPE 67S sty PE ASCIZ STRING 
BR 6S T OVER THE ASCIZ 
ji678: "ASCIZ <15)<12>/THE LOOPBACK PC WAS / 
NOV DRSLPERR,-(SP) ;GET READY TO TYPE LOOP BACK PC 
TYPE  ,SCRLF 
TYPE ‘69S 5; TYPE AascIZ STRING 
R b8¢ “GET OVER THE ASCIZ 
jib2s: ASCIZ <15><12>SET swItéH FOR LOOP ON ERROR OR LOOP ON TEST/ 
TYPE ss TYPE ASCIZ STRING 
R tos 381 OVER THE RSCIZ 
pazis: -ASCIZ (15) <12>/TYPE THE’ FIRST PC OF THE TEST TO BE LOOPED ON/ 
TYPE 73$ 5s TYPE ASCIzZ STRING | 
R 2g GET OVER THE ASCIZ 
44738: ASCIZ <15><12>/ FOLLOWED BY A CARRIAGE RETURN /<15><12> 
RDOCT | “on 
0D #2, (SP) ;GET LPADR H ine 
MOV. (SP) +, J#SLPADR 2 | 
TYPE 75$ ::TYPE ASCIZ STRING at MBS 
R ug ::GET OVER THE ASCIZ 





MO3 
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13078 +:75$: .ASCIZ <15><12>/TYPE THE PC WHERE YOU WANT/ 
13073 041320 34g: 
13080 041320 LouNoL 041326 TYPE 77 :s TYPE ASCIZ § STRING 
13081 041324 O0044 oh ae BR 6$ GET OVE Asc 
13082 27$: .ASCIZ <15)<12>/ THE PROARAM TO Poor” BACK TO FOLLOWED &Y A CARRIAGE RETURN /<15 
13083 041426 att 
13084 O41426 104419 RDOCT 
MOV (SP)+ Q4SLPERR GET LPERR 






10 
06 MOV JSLPADR, - (SP 
13087 O4144C 960002 RTI 








13032 - ; THIS SAVES THE CONTENTS OF ALL an REGISTERS 

13093 TIN MEMORY ee TAGED FROM “WC™ “ECe” 

13094 THIS IS DONE SO THAT COMPARES ARE DONE WITH SAVED LOCATIONS 
13095 AND NOT THE REGISTERS THEMSELVES. THIS WILL M 

13096 ERROR PRINTOUTS FOR GOOD AND BAD DATA ALWAYS” DIFFRENT 













13101 o41442 PUTREG: 

13102 O41442 OlOO4%E - -- MOV RO,-(SP) ;;PUSH RO ON STACK 

13103 041444 010146 MOV R1'-(5P) 3 ;PUSH RI ON STACK 

13104 O41446 010246 MOV R2:-(SP) :PUSH Re ON STACK 

13105 O414S0 O12e700 oO4DEe MOV #RAWC, RO ; STARTING ADDRESS OF REG 
13106 O41454 O1>701 Ooo00S MOV #WC, RL :STARTING ADDRESS OF WERE SAVED 
13107 O41480 Ole702 O00010 MOV wcitc SRHUCH2 “2, R2 :NUMBER OF REG. INTO Re 
13108 O41464 013021 108: MOV J(RO)+,(R1)+ | ;SAVE HARDWARE REG. 

13109 O41466 905302 DEC R2 

13110 O41470 901375 BNE 

13111 O41472 O12602 MOV (SP)+,R2 -$;POP STACK INTO R2 

13112 O41474 012601 MOV (SP)+'Ri ::POP STACK INTO RI 

13113 O41476 012600 MOV (SP}+'RO *:POP STACK INTO RO 

13114 041500 009207 
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.SBTTL RS DATA TRANSFER SUBROUTINE = 

THIS SUBROUTINE WRITES OR READS OR DOES A 

WRIT CHECK. ON CYLINDER TRACK 0 SECTOR 

IT aSsun THE RH REGISTERS ARE APPROPRIATELY 
WHEN IT RETURNS FROM THIS SUBROUTINE TO THE 
MAIN PROGRAM IT MEANS THE TRANSFER IS COMPLETE 
THE CALL IS BY A JSR RO,ICOMND COMAND 

041502 012037 oco4B42 MOV (RO)+,COMAND § ;GET COMMAND 


;CHECK THAT RHDS1 HAS DRY!DPR!MOL 
041508 Ole737 010600 001124 MOV #DRY! DPR! MOL, $GDDAT ;GET GOOD = 10300 


041514 017737 142352 001126 MOV QRHDS1,$BDDAT  ;READ RHDS1 FOR COMPARISON 
041522 O0e3737 O011e4% 001126 CMP $GDDAT,SBODAT  ;COMPARE EXPECTED 

spare WITH DATA READ FROM 
O4153G 001401 BEQ 65$ BRANCH IF GOOD 


041532 104133 ERROR 133 
;BEFORE ANY COMMAND IS GIVEN 
;RHDS1 SHOULD HAVE DRY!DPR!MOL 


3=1 
;BUT CONTAINED WHAT IS 
;GIVEN IN BAD RHDS1 


= 0— b= pp 

GIGIGIGIGIGIGIOS 

0 b= b= = pp pe 
GIGITUTUTU PUTT ry fu fue ee — 


WE KOK i IK ik ie ote 


142326 @RHDA ; TRANSFER ON CYLINDER 0 
re a ON SECTOR 0 


eth 142312 QCOMAND,@JRHCS! ;SET UP_COMMAND 
04644 NOGO 31S GO TO.8E GIVEN 

BNE 1$ ;BRANCH IF NO 
O0CSS1 142276 #G0,dRHCS1 ;SET GO 


ER TO a 
WAIT. T SUBROUTINE 
Y BIT IN 


ONM IN Cour Owo Sr waniitetan tibet tipi atitetehttpet itty LWIM-O0W ITU 


: F 3 Fit SOuNT 

;DOWN OF T .T SUBROUTINE 
;THIS TIME IS APPROXIMATELY 
;LARGER THAN SOO MILLISECONDS 


Saar 4sSs 6 A EE UIWIGI WI WWI) 


041570 : RTS RO 
RPOY DATA TRANSFER SUBROUTINE 
THIS SUBROUTINE WRITE/READ/WRITE CHECK ON THE RPOY CYLINDER QO, 


TRACK 0 ec 20. 
IT ASSUMES THE RH REGISTERS ARE APPROPRIATELY FILLED. 
WHEN IT RETURNS FROM THIS SUBROUTINE TO THE MAIN 
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PROGRAM IT MEANS THE COMMAND IS COMPLETE 
THE CALL IS BY A JSR RO, SCOMND COMMAND. 















MOV (RO}+.COMAND = s GET _ COMMAND 

MOV PKACK, (SP) “GET READY TO SET vv 

375 860, (SP) :9ET PACK ACKNOWLEDGE COMMAND 
MoV (SP 3+, IRHCS1 -SET VV 


3;CHECK THAT RHDS] HAS VVIDRY!OPRIMOL 
MOV BVVIDRY!DPRIMOL,$GODAT ;GET GOOD = 19709 


MOY - @RHDS1,$8D0AT READ RHOS! FOR COMPARISON 
CMP = «SGODATISEDDAT © | COMPARE EXPECTED 
:DATA WITH DATA READ FROM 


sRHOS1 

SEQ. css *BRANCH IF GOOD 

ERROR 132 
sBEFORE ANY COMMAND IS GIVEN 
sRHOS1 SHOULD HAVE VVIDRY!IDPRIMOL 
2107 
sBUT CONTAINED WHAT IS 
*GIVEN IN BAD FHDS1 

CLR aRHCS ; TRANSFER CN CYL INGER U 

CL aRHDST ; TRANSFER ON SECTOR O 
TRACK O 

MOV BECINFMT22, DRHOF: INHIGIT ECC 
sFORMAT 16 BIT PER WORD 

MOV QCOMAND,@RHCS! ;SET UP COMMAND 

TST NOGO 31S SO TO SE GIVEN 

BNE ;SRANCH IF NO 

ers #G0,a8HCS! sSET GO 


;WAIT FOR ROY SIT IN RHCS1 REGISTER TO SET 
WAT ;TRAP TO WAIT.T SUBROUTINE 
ao 3 AND wT FOR ROY BIT 1?! 


:SET FOR THE FULL COUNT 
:D0WN OF THE WAIT. SUBROUTINE 
STHIS TIME IS APPROXIMATELY 
see oe ae SLARGER THAN SCO MILLISECONDS 
i 
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ASSUMES T H REG 
WHEN IT RETURNS FROM THIS SUBROUTINE TO THE 
MAIN PROGRAM IT MEANS THE COMMAND IS COMPLETE. 
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THE CALL IS 
JSR RO, JCOMND 


HRY RR GRR 


MOV BMOL! IDPRiDRY $GODAT :GET GOOD DAT 


Noy ORHOS: 
CMP = §GDDAT, SB00AT 
e018 
ERROR 134 


BIT sSOT,dRHOS] 
BNE 
s IF 

MOV REW IND, aR HCSi 
BIS 
WaT 


RHDS! 
PIP 


; + - 


;HAIT hag ® oe P BIT IN 
OV s-1,1 


WAT 
RHDS1 
PIF 


: CLEAR ATTENTIONS 
Mov CLEAR. -( SP) 
BIS oe (SP) 


;GET SLAVE nee 


BODAT GET RHD 
s20T! et foeiei ros, $5008) sDISREGARD BOT 
: COMP ARE EXPECTED para WITH 


;SEFORE ANY COMMAND 
;1S_ GIVEN DRIVE STATUS REGISTER 
010 NOT CONTAIN WHAT IS IN 
31S IT ALREADY AT BOT 
F YES 


: BRANCH 
NOT AT BOT GIVE A REWIND COMMAND 
;LOAD RHCS1 WITH REWIND COMMAND 


SRHC 
;HAIT FOR “BYP BIT IN RHOS! REGISTER TO SET 
- TRAP ell: ToT SUSROUTINE 


ANS *Sybe vial ph 


DOWN OF THE WATT. 
ee Fine Es APPROXIMATES 
sTREGER THAN SOD MILL Tse SoNDS 
me HOS! REGISTER TO SET 
ATC 


;WAI 
; TRAP 10° WAIT. T put Ne 
ANG WAIT wf OR PIP BIT IN 


F ER a Sects HERE 


R PIP TO GO FROM 


NT 
: DOWN OF THE WAIT.T SUBROUTINE 
;THIS TIME IS APPROXIMATELY 
LARGER TRAN SOO MILLISECONDS 


ATO 
WAIT FoR SOT BIT IN PHOS} REGISTER TO_SET 
TRAP WAIT. Lee 


;SET FOR THE FULL COUNT 

Aine QF THE WAIT. i SIISROUTINE 
THIS TIME IS APPROXIMATELY 

‘LARGER THAN S00 MILLISECONDS 
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004200 


001709 
009019 


177777 


004202 
000001 


004646 
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142554 


14291! 
142006 


141754 


141749 
141732 


OO4E4E 


DO4 
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MUY (SP)+, IRHCS! 
uarT FOR DRY BIT IN RHOS} ehEGISTER TO SET 
PH WAIT. T SUBROUTINE 
ean Si SOND ld WAIT FOR DRY BIT IN 
DRY “RHDS1 REGISTER 
!IF ERROR OCCURS HERE 
:IT MEANS “DRY” 
:SET FOR THE FULL COUNT 
x :DOLN OF THE WAIT.T SUSROUTINE 
“THIS TIME IS APPROXIMATELY 
*LAR of R THAN SOO MELLISETONDS 
CHECK IF COMMAND IS REVERSE READ 
iF IT tie REVERSE READ, pate RE ORUARD ONE BLOCK 


EVRED, JCOMAND ide, Biel 6 a “ READ 


NE 
1S fbore NML,ORHTC :800 SPI NORMAL 
1c sEPAR. SRHTC  :0DD PaRiTy 


MOV 8-1, JRHFC fa 
MOV FO, JRHCS1 SPACE FOR 


BIS IPHCS1 
= WAIT FoR “43 BY? IN RHDS! REGISTER TO SET 


WAT ; TRAP TO _WAIT.T BUGRQUT INE 
RHDS1 “. PAND WATT FOR PIP BIT IN 
PIP . :RHDS1 REGISTER 

3 tf ERROR OCCURS HERE 


WAIT FOR spi SIT T_IN g408] REGISTER T 


R PIP 
WAT ;TRAP TO’ Malt. 1 SUBROUTINE 
RHDS1 SAND WAIT FOR PIP BIT IN 
PIP TRHOS] REGISTER 


ISTE 
iif ERROR Ay HERE 


;SET TH ULL COUN 

Hon OF THE W ATT. t SSROUTINE 
THIS TIME IS APPROXIMATELY 

LARGER THAN SOO MILLISECONDS 


CLR ATO 
AIT rok ORY BIT IN RHOS} ReeesTen TO_SET 


WaT TRAP TO WAIT.T SUBROUT 
RHDS! : AND WATT FOR DRY BIT INS 
DRY *RHDS | 


REGISTER 
IF ERROR OCCURS HERE 


:IT MEANS "ORY" OID NOT 


;SET FOR THe FULL COUNT 
;DOWN OF THE 


;NOW GIVE COMMAND 





T 1 
R SPACE E FoRUaRO ONE BLOCK 


xT! 
R THAN 10.8 sacra: 


TA An 
yw 


OWN WAIT, T SUBROUTINE 
;THIS TIME IS APPROXIMATELY 
;LARGER THAN SOO MILLISECONDS 
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Rta Ha ett, QRHTC ; ees Peat NORMAL 


MOV JRHWC , aR epS “GET W ly 
NEG (SP) : GET Post Tive UNGER 
ado 3B) (SP) -DOUSLE WORD COUN 
NEG (§P) :GET NEGATIVE SUNBER FO 
:FRAME COUNT REGISTER 

MOV (SP)+, RHFC :FT LL FRAME COUNT 
MOV 3ZOMAND, JRHCS! GET COMMAND 
TST NOGO :IS GO TO ee GIVEN 
SNE 4§ BRANCH IF 
8Is G0, dRHCS1 :G0 

WAIT FOR DRY BIT IN RHDS1 REGISTER TO SET 
har -TRAP TO WAIT.T SUBROUTINE 
RDS! “AND WAIT FOR DRY BIT IN 
DRY far REGISTER 


F ERROR OCCURS HERE 
:IT MEANS “DRY” DID ror 
SET FOR oe FULL COUN 
DOWN OF THE WAIT.T SUBROUTINE 


:THIS TIME IS APPROXIMATELY 
LARGER THAN SCO MILLISECONDS 


yeast FOR RDY SIT IN RHCS] REGISTER TO SET 
;TRAP TO_WAIT.T cae 


RCS! ; AND WAIT FOR RD’ 
ROY ;RHCS1 REGISTER 
;I1F ERROR OCCURS e 
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:* THIS ROUTINE WIL BLOW THE CHANGE OF THE SASE 
:* ADDRESS FROM 176700 TO ANY TYPED VALUE 
BASECH 

TYPE 65$ 3 TYPE ASCIZ STRING 


SR 4$ OVER THE ASCIZ 
ge eASCIZ §<15><12>/PRESENT ‘Agee ADDRESS OF REGISTERS IS / 


£4 
Nov DHRHCS1.-(SP) GET READY TO TYPE OLD BASE 
TYPE &7$ :3 TYPE ASCIzZ STRING 
3R &$ T OVER THE ASCIZ 
i878: SASCIZ <15><12>/TYPE NEW BASE ADDRESS FOLLOWED SY 'CR’/ 
RDOCT 
MOV #RHDB, RO ;GET STARTING ADORESS OF RGISTERS 
MOV #20. , R1 ;NUMBER OF REGISTERS 
1: BIC 8tC7?, (RO) “CLEAR OLD BASE 
BIS (SP), {RO)+ ;SET NEW BASE 
DEC Ri : COUN 
BNE 13 :BRANCH IF 20 NOT DONE 
TYPE £9$ 35 TYPE ASCIZ STRING 
3;GET OVER THE ASCIZ 
i838 ASCIZ <15><12>/PRESENT VECTOR ADDRESS IS / 
NOW DeRPVEC,-(SP)  :GET READY TO TYPE OLD VECTOR ADDRESS 
TYPE ,718 :;TYPE ASCIZ STRING 
BR - 30g ET OVER THE ASCI 
bic iS: "ASCIZ <15)<12>/TYPE NEG VECTOR ADDRESS OR RETYPE OLD ONE FOLLOWED BY “CRY 
RDOCT 
MOV (SP)+,d8RPVEC  ;SETUP VECTOR ADDRESS 
TYPE 73$ | 3; TYPE ASCIZ STRING 
R 2g GET OVER THE ASCIZ 
i728 "ASCIZ <15)<12>/RESTART PROGRAM FROM 200 O8 210/ 
TYPE 75$ : 3 TYPE fsclz STRING. 
a8 ous OVER THE aS¢cI 
44758: SASCIZ <15><12>/NEW nasi mil REMAIN/ 
MOV DARHCS1,-(SP) 
TYPOC 
TYPE 77 ss TYPE ASCIZ STRING 
BR PES GET OVER THE ASCIZ 
ji27s: "ASCIZ <15><12>/NEW VECTAR WILL REMAIN » 
MOV DBRPYEC, - (SP) 
TYPOC. - 
YPE 798 +s TYPE asclz STRING 
BR rat} GET OVER THE ASCIZ 
4738: "ASCIZ << 15>< 12> UNTIL phieman IS RELOADED, 
HALT 
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O43056 
043062 


043106 


O431i§ 


104491 043054 
000411 


104402 
pieree 043058 137600 
UUC000 
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RPVECT: 
TYPE 


uit 


te y 


BR bug 
TASCIZ 7 TRAPED FROM PC 2 


OV #RPVECT , JRPVEC 


ee ee ee Se 


;; TYPE ASCIZ STRING 
i3GET OVER THE ASCIZ 


sTYPe F PC 
‘RESTORE. TRAP RPOY VECTOR 
:CHANGE TO CONTINUE 
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043120 
043120 


043124 


043140 
picts 


005037 
005037 
032777 
001111 
OOO41E 


013746 


CCo4e3 
032777 


e) 
012737 
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OO4646 


oo4S44 
040000 


ooc0o4 


o0000% 


oocoo4 


00040 
135726 
001193 
001115 
001009 
001110 


001103 
OOlele 


004000 
001100 


001104 
O0lele 


000001 
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136002 


000004 


135734 
001102 


001193 


135676 
001106 


135644 


001104 
001104 
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¢ FRELRELELELELLFFLELFEFELEF ES 


-SB8TTL SCOPE HANDLER ROUTINE 


5 RRR REE KEK KARR EER EERE E EERE EERE EEE EAI EEE EEE RIES REE 
:ATMTS ROUTING CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCE fEMENT 
AND LOAD THE TEST ge eee ed INTO THE DISPLAY REG. (DISPLAY<7:0> >} 
8D LOAD THE ERROR FLAG (SERFLG) INTO DISPLAY<15:08> 


THE Fs phen sate y On tee BY THIS ROUTINE ARE: 


esr = EST 
:aSWi1=1 INHIBIT ITERATIONS 
> *5WO9=1 LOOP ON R 
:*S5W08=1 LOOP ON eer IN SWR<7:0> 
7 *CALL 
:% SCOPE :;SCOPE=IOT 
SSCOPE: 
CLR WATO :WAIT FOR BIT TO SET 
:USED IN “WAT” WAIT ROUTINE 
CLR NOGO :D0 GIVE GO IN COMMAND. ROUTINE 
1$: BIT #81714, ISWR 5 LOOP ON PRESENT TEST? 
ete OVER YES fs =] 
-##eeHSTART OF CODE FOR THE XOR tistéRs 
$xTSTR: BR 5$ vIF RUNNIN ON THE “XOR™ TESTER CHANGE 
$i THIS INSTRUCTION TO A “NOP” ( 
MOV DKERRVEC,-(SP) ::SAVE THE CONTENTS OF THE ERROR VESTOR 
MOV #5$, JHER RAVEC i396 MEOUT 
TST a#177060 TIME OUT ON XOR? 
MOV (SP)+. J#ERRVEC :FRESTORE THE ERROR VECTOR 
BR $5y yLab ::G0 TO THE NEX 
S$: CMP (SP)+, (SP) ::CLEAR THE STACK AFTER A TIME OUT 
MOV (SP)+: SRERRVEC ;;RESTORE THE ERROR VECTOR 
BR 3 LOOP ON THE PRESENT TEST 
6$::#e88#END OF CODE FOR THE oi ‘tes! EReeeee 
gi #81708, , OSWR PON SPEC. TEST? 
CMPB 4s SW, $STSTNM 118k THE RIGHT TEST? SWR<7:0> 
BEQ SOVER 33 
2g: 1318 SERFLG ?:HAS AN ERROR OCCURRED? 
CHP SERMAX,SERFLG ::MAX. ERRORS FOR THIS TEST OCCURRED? 
git 8BITO9, ISWR ::LOOP ON ERROR? | 
7S: NOV SLPERR, SLPAOR -:SET LOOP ADDRESS TO LAST SCOPE 
4g: CLRB ERFLG ::Z2ERO THE ERROR FLAG 
CLR STIMES LER THE NUMBER oF ITERATIONS TO MAKE 
BR 13 ESCAPE TO THE NEXT TEST 
3$: BIT aG1T11, SUR st INHIBIT. ITERATIONS? 
TST $PASS IF FIRST Pass OF PROGRAM 
BEQ 5 INHIBIT ITERATION NS 
INC SICNT ;s INCREMENT ITERATION COUN 
CMP STIMES, SICNT ss CHECK THE NUMBER OF HYERATIONS MADE 
BGE OVER -8R IF MORE TTERATION FR 
1S: MOY #1, SICNT ::REINITIALIZE THE TEROTION COUNTER 
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043326 


MACYL1 27(732) 


SCOPE HANDLER ROUTINE 


013737 


ett O0lele2 


61 001115 
thie 135552 


OO Or 


22-SEP-76 15:11 PAGE eSé 


MOV SMXCNT, STIMES 
TSTN 


$SVLAD: INCB 


MOV (SP), $LPADR 
MOV (SP), SLPERR 
CLR SESCAFE 


M MAX 
SOVER: MOV srathn 3 301 SPLAY 


rey $LPADR, 
SMXCNT: 4 


ee ee ee 


(SP) 





;;SET NUMBER OF ITERATIONS TO DO 


HRs Ni HOE” Aforess 


;; SAVE ERROR LOOP ADDRESS 

;;CLEAR THE ESCAPE FROM ERROR ADDRESS 

ONLY ALLOW ONE(1) ERROR CN NEXT TEST 
DISPLAY TEST NUMBER 

ite pie eat ADDRESS 


X 
5 EMAX. NUMBER OF ITERATIONS 
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043490 


020200 
oco0e0 
ooooss 


043614 
000040 


043604 


o00c01 


000001 
000080 
000040 


177777 


000010 


177777 =177776 


ny ed ee eee 


012602 
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CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 
-SBTTL CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 





5 EEKKRKK KKK KKK K ARK ER EKER E EERE EERE EERE EERIE EIDE ADES 
SATHIS ROUTINE IS USED TO CHANGE A 16-SIT BINARY NUMBER TO A S-DIGIT 


;*N P E R NUS SIG PE 
:*BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE 


;* 


“ho 


STYPDS: 


1$: 


2s: 
3$: 


4$: 


cs: 


8: 


9S: 


s AREPLACED WITH SPACES. 
MOV 
TYPDS 


NUM, -(SP) 


#20200, - -(SP) 
20(SF);RS 
1$ 
Re 

#°-,1(SP) 


#EDBLK,P2 
, (R3)+ 


Re 
ay Be RO? Ra 


1(SP) ,-1(R3) 
#’°0,Re 

#’ | RO 

Re, (R3)+ 
(RO)+ 

RO, #10 

2$ 

8$ 

R5,R2 

(SP)+ 


93 
~1(SP),-2(R3) 
(R3) 


;;PUT_THE BINARY NUMBER ON THE STACK 
;;GO TO THE ROUTINE 


T POIN TER 
itaey THE FIRST oo TO A BLANK 
;;CLEAR THE BCD N 
i 38 THE CONSTAN 
Hee THIS BCD DIGIT 


R IF DONE 
: HINCREASE THE BCD DIGIT BY 1 


;;ADD BACK THE CONSTANT 
CHECK IE BCD OIGIT=0 

tIFALL THROUGH 

3STILL DOING LEADING 0°S? 
;3BR IF YES 


+ 1BR IF_NO 
: iYES--SET THE SIGN 
; MAKE ite BCD DIGIT ASCII 
dt IT A SPACE _IF NOT_ALREADY 
3;JUST INCREMENT 
;;CHECK THE TABLE INDEX 
330 DO THE NEXT DIGIT 

"7 EXIT 


iiGET THE E50 
3 G0 CHANGE TO_ASCIT 
3 oR Pe LSD THE FIRST NON-ZERO? 


A DIGIT 
;;PUT_ THIS eenTIe IN THE OUTPUT BUFFER 
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13565 043562 


043614 


13593 043624 


043724 


043730 
043734 


TU 0 + 0 -  t  e 


a! . Sees 


og9004 


105737 


013746 


LOS366 
002770 
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oocco4 


001157 .. 


oo00de 


cn 


ooooc2 


00001! 
000200 


044040 


043774 
001156 


001154 
000001 
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CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 


012601 
0 





MOV (SP)+,R1 +; POP STACK INTO R1 
MOV (SP)+,R0 :iFOF SI ACK_INTO is 
TYPE DBLK YPE THE NUMBER 
MOV 2(SP),4(SP) ADJUST THE STACK 
MOV (SP)+; (SP) 
RTI ::RETURN TO USER 
$OTBL: 10000. 
1000. 
100. 
10. 
SOBLK: .BLKW 4 
.S8TTL TYPE ROUTINE 
5 RXR, ERE ERERERAERERREE EE EERE EERE EERE REEL EERE EE AR ERE ELE EELERE 
; ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A O BYTE. 
SXTHE ROUTINE WILL INSER! NUMBER OF NULL CHARACTERS BFIER @ LINE FEED. 
: ¥NOTEL: SNULL CON TAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 
: ¥NOTEe: SFILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
i #NOTES: SFILLC CONTAINS THE CHARACTER TO FILL AFTER. 
SCALL: 
DD USING A TRAP INSTRUCTION 
x TYPE  ,MESADR ;;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 
;*0R 
: TYPE 
+ % MESADR 
3% 
STYPE: ISTE STPFLG :;IS THERE A TI IMINAL? 
HALT ; HALT HERE IF NO TERMINAL 
1$ MOV -(SP) :SAVE RO 
MOV 2tsSP),RO itaey ADDRESS OF ASCIZ STRING 
2 MOVB (RO) +,-(SP) ; ; PUSH CHARACTER TO_BE TYPED ONTO STACK 
BNE IT ISN'T THE TERM! 
TST (SP)+ 33 1F TERMINATOR POP IT OFF THE STACK 
603: MOV (SP)+,R0 T 
38: BdD #2, (SP) :ADJUST RETURN PC 
4S: CHEB #HT, (SP) BRANCH IF <HT> 
CHPB #CRLF, (SP) ;:BRANCH IF NOT <CRLF> 
TST (SP)+ :;POP <CR><LF> EQUIV 
TYPE >: TYPE @ CR AND L 
CLR8 § $CHARCNT 3 CLEAR CHARACTER COUNT 
BR $ *:GET NEXT CHARACTE 
cS: JSR PC, STYPEC G0 TYPE THIS CHARACTER 
63: CMPB =s«GFELLC,(SP)+  ::IS IT TIME FOR FILLER CHARS. ? 
BNE 2S IF _NO GO GET HA 
MOV $NULL, -(SP) $$GET # OF PTLLER cHaRe "NEEDED 
AND THE NULL CHAR. 
7$: DECB  =-_-«L( SP) +1 DOES A NULL NEED TO BE TYPED? 
BLT 6$ :BR IF NO--GO POP THE NULL OFF OF STACK 
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043736 
043742 
043746 


043750 


Dyuo4e 


os4o44 


O440S2 


044064 


044132 





5337 
aaeeF0 








112716 


000207 











000060 








044064 





005037 
012737 
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004737 ‘ass 74 
10 044040 
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5;G0 TYPE A NULL 
3300 NOT COUNT AS A COUNT 


HORIZONTAL TAB 


Tx ge TAB WITH SPACE 
YPE A SPACE 
HBRRNGH TF NOT AT 
; ;POP ie oni aT BRK 
;; WAIT GNTIL PRINTER IS READY 


;;LOAD CHAR TO y TYPED INTO DATA REG. 
3315 Roe En CARRIAGE RETURN? 
HVES~-CLEAR CHARACTER COUNT 


3318 ee a A LINE FEED? 
H_IF YES 


E CHARACTER 
: CHARACTER COUNT STORAGE 


Oshaw 
4 
< 


INCB 
Poe bere 


.SBTTL TTY INPUT ROUTINE 


fg RERRRRRRAAE ARERR KEKE LEELA AER EEE ERE REL E NE ERLEREEE EEL ERE EERE 


1] 
0 
0 
9. 


; ¥TK a Sea ROUTINE 
UTINE WI ITIALIZE THE TTY KEYBOARD INPUT QUEU 
SETUP ACHE INTERRUPT VECTOR AND TURN ON THE KEYBOARD INTERRUPT 


SS OF THE 
T 8 OUTEUT POINTERS. 
it be booss VECTOR 
#200 Kak, aeIK Ec 


DONE FLAG 
STENABLE TTY KEYBOARD INTERRUPT 
:tRETURN TO CALLER 


;*TK SERVICE ROUTINE 
:*THIS ROUTINE WILL SERVICE THE 
:*BY READING THE CHARACTER FROM 


TTY KEYBOARD INTERRUPT 
THE INPUT BUFFER AND PUTTING 





MAINDEC-11-DERHAB-A MACY11 27(732) 22-SEP-76 15:11 PAGE 260 
DERHAB. SRC TTY INPUT ROUTINE 


;*IT IN THE QUEUE. 
:¥IF Ma Gres ACTER “CONTROL-C” (tC) STKINT IS Coulee AND 
UPON RETURN EXIT MAD TO THE “CONTROL.-C” RESTART ADDRESS (OPERSEL) 


044134 117746 135006 éTKSRV: MOVE -STKB.-(SP) 
77600 BIC ##0177, (SP) 
bo0803 ), #3 


1$ 
044543 SCNTLC 
O44064 PC STKINT ane | THE KEYBOA 
(SP)+ :CLEAN UP STA i 
O44164 900137 o408S4 OPERSEL ‘CONTROL C RESTART 


044170 1$: 
O22737 O00011 O44044 leaker 


001216 


BR S$ EXIT 
oco0e3 : iis ites A_CONTROL-S? . - 
3e$ ;; BRANCH IF 
134722 Lye: TTY KEYBOARD INTERRUPTS 
73CL EAN CHAR OFF STACK 
134714 T F 


OR A CHAR 
31$ ; LOOP UNTIL ITS THERE 
134710 _ > ¢GET_THE CHARACTER 
177600 BI fF I 

o000e1 

000100 134666 #100, a$TKS 


O44O44 STKCNT 
000140 .- St ae 


000175 (SP), #175 
4$ 


oo00040 I #40, (SP) 
177536 : (SP}+, JSTKQIN 


ND PUT 
O44D46 I : UPDATE THE POINTER 
O44046 044083 STKQIN, #STKGEND 3360 OFF TH TH HE BN ND? 
o440s2 o4404G #STKQSRT , STKQIN RESET THE POINTER 
044332 oddo0e cS: : RETURN 


.DSABL LSB 


5 KEELE RHEE KKK K ERK LARK EH EERE REA H AERA E AEA H ARE REE E AERA RE RARER ERES 
jATHIS: ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 


GET A CHARACTER FROM ne yree 


RDCHR 
RETURN HERE :: CHARACTER IS ON THE STA 
ttHITH PARITY BIT STRIPPED OFF 


O44334 O11646 $RDCHR: MOV (SP) ,-(SP) ;;PUSH DOWN THE PC AND 
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o444e4 


044600 


016666 


poo0d2 
005737 
001775 


Baa082 


010346 
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000004 
000004 
044360 


404s 
o44o4y 
177452 
O44050 
044050 


O440S2 


044532 
044543 


000177 
001222 
044530 
044530 
000015 
177777 
O0ie24 


oooco4 
044532 


006503 


000040 


000002 


000094 
044063 
044050 


000002 
oc0004 


000012 

00 
000012 
Oe0lee 


053505 
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4(SP) ,2(SP) 
4(SP) 

-(SP) 

#64$,-(SP) 
$TKCNT 

1$ 

$TKCNT 

aie? » 4(SP) 
$TKQOUT, HSTKQEND ; 
#$TKQSRT, STKGOUT’ ; 


;;WAIT ON A CHARACTER 


5 sDECRENENT re COUNTER 

4h ONE CHARACTER 
;UPDATE_THE POINTER 
;01D IT e OFF OF THE END? 


“RESET THE NPOINTER 
* RETURN 


2s: RTI 
AEH HEHOIU HEHEHE SHEE ESSE OSHS 
sRTHIS: ROUTINE WILL INPUT A STRING FROM THE TTY 


RDLIN 
RETURN HERE 


$SROLIN: 
1$: MC 


23: 


«9S: 
STTYIN: 


SWRA: “ASCIZ 


-ASCIZ 


RStTYIN, R3 
ESTTYINGS. , JR3 


8177, tha) 
SQUES 
(R3), 9S 
iS, (R3)+ 


P) 


3. 
/4*0/415><12> 
/tU/<15><12> 
/tG/<15><1e> 
(15><12>/SWR = 


/ NEW = 


s INPUT A STRING FROM THE TTY 
St ADDRESS OF FIRST CHARACTER WILL BE ON THE STACK 
t: TERMINATOR WILL BE A BYTE OF ALL O°S 


> ;SAVE R3 
i ete ADDRESS 
BU reer pul? 
BR gy MS aati FROM THE TTY 


;;GET_CHA 
3315 IT A RUBOUT 
i. KIP IF NO 


CLEAR THE BUFFER AND LOOP 
;;ECHO THE CHARACTER 


3 CHECK FOR RETURN 
OOP_IF NOT RETURN 

53CL va RETURN (THE 15) 

t RESTOR LINE FEED 


; ;ADJUST THE STACK _AND PUT ADDRESS OF THE 
3 FIRST ASCII CHARACTER ON IT 


;;RETU 

HSTORGGE FOR ASCII CHAR. TO TYPE 
; TERMINATOR 

; sRESERVE 9. BYTES FOR TTY INPUT 
; CONTROL “Cc 


CONTROL " 
BECONTROL "GQ" 


;FROM THE TTY 








ts) 


LONMO-OChO 


2 IGIGIGIGS 
Ce he ee ee ie 
OOHOL 


ERS ee ih 


. 
. 
| 
é 
‘ 
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. 
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. 
‘ 
. 
‘ 
. 
} 
= 
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a 
. 


eed ed ed 
POIGICICICIGICIGIGs GIGIGNM 


Mc wtom0ds 
-QO00C 


SOULE GOfue-O.000 30" 


*0-+0-<0-+8 
if 


Oo-O0000 
0-0 -- (_J0-+ 0-9-0 + 


o+o-0 
etetate: 
ali 


Gofue-MUnNon £OOoQods 
NONLOOO eS ; 
Wve- Meu £ . IOS £ Le 


o-~- 
Oro 


-0-*+0- +0 +0 ope 


“o 
tottedetetrdititrtedtrtitititiditedetetrard trted 
PeT eat eeleelealislesiisleeleslisieeleciiaieal 


“+ 
CUDTUPTUTUDe + 0 & +b 0 + 0-0-8 8+ 


dofur-Owm 


coonco 00.00 0000 00 Go 0D 00 


t 
te 
3 .£CUONWNC Wurm 
-Onommaotrur- 


-C 


Or-r-OOOOOOI0OO 
OXNDOYIO?l?--t0--— = 


A 4 MMS dnt cited ath th thet Sh aby 


oe C.D N00 ON OO. SOU 


ey ee eed ed ed ee ee ee ee eee ed) 


LOCUCU GIGI Med 
4 


cococooDCOdoOoOdn 
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~SBTTL READ AN OCTAL NUMBER FROM THE TTY 


es RERERESSESRESLE HELE SHEERS EERE SE LESSEE SESE SS SEEASES SEES ESSE SEESESSE 
s#THIS ROUTINE Bi ene AN OCTAL (ASCII) NUMBER FROM THE TTY AND 
ie , 


CHANGE IT TO SINR 


r#THE INPUT CHARACTERS WILL BE CHECKED TO INSURED THEY GRE LEG 


ILLEGAL CHARACTE 


s#OCTAL DIGITS. IF pao |! 





LL ge TYPEl 
_ s*FOLLOWED BY A CARRIAGE RETURN-LINE FEED. THE COMPLETE NUMBER MU 
-;#THEN BE RETYPED. THE INPUT IS TERMINATED BY TYPING A CARRIAGE & 


s*CALL: 


2% RODOCT ::READ AN OCTAL NUMBER 
:# . » RETURN HERE *:LOW ORDER BITS ARE ON TOP OF THE ST 
;* *:HIGH ORDER SITS ARE IN $HIOCT 
SEDOCT: MOV (SP), -(SP) ::PROVIDE SPACE FOR THE 
MOV 4(SP) 2°SP) :: INPUT NUMBER 
MOV RO. -(55) ::PUSH RO ON STACK 
MOV R1,-( 59) :;PUSH R1 ON STACK 
MOV Re, -(5P) ::PUSH Re ON STACK 
18: ROLIN :;READ AN ASCIZ LINE 
MOV (SP)+,R0 ::GET ADDRESS OF 1ST CHARACTES 
MOV ROSS ::AND SAVE IT 
cLR Ri *: CLEAR DATA WORD 
zs: MOVE. . (RO)+,-(SP) :;PICKUP THIS CHARACTER 
3&9 3 ::IF ZERO GET OUT 
CMP —ti(‘ég'', CSP) ::MQKE SURE THIS CHARACTER 
BG’ 4 ::IS AN OCTAL DIGIT 
CMPS e*7, (SP) 
LT 43 
ASL Ri 23 #2 
ROL R2 
ASL Ri ssi 
ROL Re 
8SL Rl 33 #8 
ROL Re 
BIC atc7, (SP) ::STRIP THE ASCII JUNK 
ADD (SP)+,R1 2sQ00 IN THIS DIGIT 
BR 23 ;;L00P 
33 TST (SP)+ ::CLEAN TERMINATOR FROM 
MOY R1,12.SP) -:SAVE THE RESULT 
MOV Re. SHIOCT 
arent (SP) +, Re :;POP STACK INTO R2 
MOV (SP)+.R! »:POP STACK INTO Rl 
Hoy (SP }+,R0 i Poe STACK INTO RO 
1 oe 
4g TST (SP)+ -:CLEAN PARTIAL FROM STACK 
CLRe (RO) ::SET A TERMINATOR 
TYPE >: TYPE UF THRU THE SAD CHAR. 
=f WORD 0 
TYPE SQUES ghee CR § gM 
BR 1g :: TRY AGAIN 
SHIOCT: .WORD 0 :;HIGH ORDER BITS GO HERE 


mt a ee a ee 


Alee 


Sa 4 
De 


0 MOU 4.63 ar 


me ee 
SRC 


mi 


i 
LLL 4 


eel t a) i 
ws 


JILIGIGIGIGIGOS 
Pepaarurey 


SN Oa 
-C.00cOo™) 


“J 
fue 


coanap 


“ae ae de detetre wis 


noo co op co cu 0D COCO Go C 
a bee | oot a Di | 
IP Ul uo 


C.000 NIU £ tofu Cunt 


00 +O +0 +0 +b) +8-+0-96 +08 ed ee ed eee ee ek ek ed ed ed eo ee ed ed ed ed ee ee ee ee ee ee ed ee ee ed ed ee eee ee ed ee ed ee -0+0-+ 9p 
PU CLO CIC COCIG IOI GI 00 GI GIG) CUOGIGIGI I GIGIGIGIONIL 
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4000000000000. 00.00.0000 00:00 00.00 Co 00 00 COG SJ 

co NOP ONL Gorue- 


t& 
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~DERHAS- = 


~S8TTL ERROR HANDLER ROUTINE 

; RRRREPRELERRSRERAL REELS ELLE LE RARE ESE SSSSEESEESESE RES ES ESSE ESS 
yey THE ERROR FLAG AND THE ERROR COUNT, 
ait - he ee ER AND THE RDORESS OF THE ERROR CALL 
mg SWITCH SPT 20Ks s FROVInED SY THIS ROUTINE ARE: 
ited ERROR TYPEOUTS 

LL e N ERROR 

£50 ON ERROR 
;;ERROR=EMT AND N=ERROR ITEM NUMGER 


8-9 


QoQ 


oo 
o-- 
oO 
Gs 


THE FLAG GO TO ZERO 
av-4}DIspLay test NUMBER BND. re 
LL ON ERROR? 


~g~ 
- 


fo-d 


~~ 
oO oo © 


GIGI 


Ww 

4 fu™ 

a2 
. 


HE NUMBER OF ERRORS 
RESS OF ERROR INSTRU 


4 Save teat ERRO 


Dunc 
Suma 

e-« 

ro 


SSN Ne 


#2 RPC 
st 311 TEMS 


fuWeree> 
Bower Gru 


oo 
tor 


4 mo 


HG Bt Eeaoe SWITCH SET? 


vi FUDGE RETURN FOR LOOPING 
CHECK FOR AN ESCAPE RODRESS 


3BR_ IF NONE 
: FUDGE RETURN ADDRESS FOR ESCAP 


RTI U 
. FTA i BA RE ANE | fo Me i pe 
“Sart ERROR MESSAGE TYPEQUT ROUTINE 
NE USE 5.) HE “ITEM CONTROL BYTE” (SITEMS) TO DETERMI NE. Wi 
E REPORTED. THEN OBTAINS, FROM THE “E 
SEN REPORTS THE APPROPRIATE INFORMATION CONCERNING THE ERROR. 
“IT J OPY OF al SUBROLITINE FROM SYSMAC. 


;#F TR SWITCH 6 IS SET AND SWITCH 8 RESET THEN 
#ALL REGISTER CONTENTS WILL BE TYPED BEFOR A Ag ehP THE ERROR 
s #SECOND IF THE CURRENT ERROR HAS THE SAME ITEM NUMBER 

THE PREVIOUS ERROR THEN ONLY Me DATA WILL BE TYPED 

: PREVIOUS aren NO. F costhbae 

GE ITCH TY 


;KEEP ONLY shitcn 5 AND & 


ERD NOT THE ERROR MESSAG 
RITEM: 
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PA 
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my 
£6 


HIM wo 


3.000 OU -£ Gone OO. - 30 UTE Gatue- Op 


000009 CGI 00 69006 0) G0 OO) C0 GIO) GIO GI GI GI GIGIGIOIGIGIGICIL 
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. Ss 


Gone O.000 NOU. one Ou, 00 IO ULE Gifu 
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“ 


. 
0+ 0+ 0-2-2 0 + 0+ O-* 0 Bo 8 8 ed 9 0 0 8-2 + 0 8 b+ OO b+ = o-0 b- 0 bo + b= b 8 0 Do ho h-0 Bo 2 ho Bo pe 


tw 
whe 
iar 


Ww 

uf 

sob de 
Onown 


0 +0-+0 + 0b <8 
LOLVLIGICIWIOIE 
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src ERROR MESSAGE TYPEOUT ROUTINE ; 
085112 o22726 000100 oMP BSWOS, (SP) + ;1S & SET AND @ RESET 
O45116 001001 BNE 1$ : HE NOT RANCH 
O4S120 O0040e 35 33 BRANCH IF Si & IS SET AND 2 RESET 
S45iZ2 050137 o4eoz2 1$: IMP DeTYPERR sJUMP_IF SW 8 IS SET #: 
[OR IF SW§ IS RESET GND SW & IS SESET 
o45126 104401 codzoc 23: TYPE =, CRLF 
O45132 10440: 45140 TYPE 65s TYPE _ASCIZ STRING 
045138 00405 _ ee | Wes 33GET OVER THE ASCIZ 
3365S ASCIZ / RHWCs / 
o4s152 £48: 
O45153 217746 138704 MOV RHC, -(SP) GET READY TO TYPE RHWC CONTENTS 
O4Si55 1O4402 TYPOC 
O4S180 104401 45166 TYPE =, 678 ;; TYPE ASCIZ STRING 
o4Sies 000405: eee a $:GET OVER THE ASCIZ 
P32 gge°$: .ASCIZ 4 | -RHEAS 
045200 £6$: 7 
O45200 O1TTHE 128860 MOV JRHBA, -( SP) GET READY TO TYPE RHA CONTENTS 
O45254 104402 TYPOC 
O4s206 104401 O4s214 TYPE £33 ;;TYPE ASCIZ STRING 
48212 O0o40e es | ee :7GET OVER THE ASCIZ 
3,898: .ASCIZ RHCS2= 
045230 b6$: 
O45S30 O177HE «136834 MOV DRHCSZ,-(SP)  ;GET READY TO TYPE PHCS2 CONTENTS 
O45234 1d4402 TYPOC 
O45236 10440: oONs244 TYPE 718 ; TYPE _ASCIZ STRING 
O4S242 O0040E ct ee ::GET OVER THE ASCIZ 
ss71$: .ASCIZ / RHCSI= / 
o4s260 +s: 
45260 O1774E «136574 MOY ORHCS1,-(SP)  ;GET READY TO TYPE RHCSL CONTENTS 
C45365 104402 TYPOC 
C4526 104401 O45274 TYPE 733 TYPE _ASCIZ STRING 
45272 S004 BR 72 ;GET OVER THE GSCIZ 
uivaS:  -ASCIZ ¢” RHOSI= / 
45210 P2S: 
O45310 O1774E 128556 MOV. DRHDS1,-(SP)  ;GET READY TO TYPE RHOS! CONTENTS 
B4HESi5 [o4402 TYPOC 
O4S31E 104401 O45324 TYPE 758 7; TYPE ASCIZ STRING 
045322 D00406 BR Pu tiGET OVER THE ASCIZ 
3758: .ASCIZ / RHERI= / 
045340 4g: 
CHE340 O1774E 136530 MOY RHER1,-(SP) | ;GET READY TO TYPE RHERL CONTENTS 
OHES44 «04402 TYPOC 
OHSSHE «=LOHHD1 «CHESS 4. Se os ; TYPE ASCIZ STRING 
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sort 


0.0.0.0.0.0000.0 
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DERHAS. SRC 


04S3S2 


045376 


p4s420 
045430 
O45434 


045426 
045432 


o4S4SO 
Qy5use 
ous4s9 


O4S4SE 
045452 


ousu7e 
ous47E 
o45s02 


045504 


045510 


o4sse4 
545524 
O45E3c 


n4ss522 


645536 
o4ssse2 
45555 


C4SSS56 


~ 
OCO406 


J17746 
104402 


104401 
000405 


017746 


104402 


LO44O1 


ERA. M 


136476 


045434 


136412 


O4S5464 


136412 


O4SSEE 


136300 


045614 


22-SEP-76 
OUT ROUTINE 


oo, me 


-89$: 


bbs: 


BR 
oASCIZ 
MOV 
TYPOC 


TYPE 
5R 
~ASCIZ 
MOV 
TYPO? 
TYPE 
88 
~ASCIZ 
MOV 
TYPOC 
TYPE 
BR 
.ASCIZ 
MOV 
TYPOC 
TYPE 
BR 
~ASCIZ 
MOV 
TYPOC 
TYPE 
BR 
-ASCIZ 
MOV 
TYPOC 
TYPE 
BR 
-ASCIZ 
MOV 
TYPOC 


TYPE 


15:11 PAGE 265 


76$ 
/ -RHER2= / 


JRHERE , - (SP) 


ORHER3, -(SP) 
S1$ 
808 


ORHDST, - SP) 


935 
§2§ 
/ RHCA= . 


JRHCA, - (SP) 


QRHMR, (SP) 


318 


ne ee ee ne eee - eee: 


RHDST= / 


3;GET OVER THE ASCIZ 


;GET READY TO TYPE RHER2 CONTENTS 


;; TYPE ASCIZ STRING 
3;GET OVER THE ASCIZ 


;GET READY 70 TYPE RHER3 CONTENTS 


7; TYPE ASCIZ STRING 
;;GET OVER THE ASCIZ 


;GET READY TO TYPE RHOST CONTENTS 


:; TYPE ASCIZ STRING 
33GET OVER THE ASCIZ 


;GET READY TO TYPE RHCA 


" READY TO TYPE RHAS 
:; TYPE ASCIZ STRING 
33;GET OVER THE ASCIZ 
;GET READY TO TYPE RHOF 


;; TYPE ASCIZ STR 


IN 
;;GET OVER THE ASC 


= 
ry 
-— 


;GET READY TO TYPE RRMR 


3; TYPE ASCIZ STRING 


CONTENTS 


CONTENTS 


CONTENTS 


CONTENTS 
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14026 045662 







14029 o45704 










14034 o4s712 
14035 O45716 
14037 945734 
i403 045734 
14039 O45740 











14042 Q4Us742 
14043 45746 


14045 045762 






14055 945770 
14051 045774 
24053 046010 
14054 O46010 
18055 O46014 


14057 O46016 


ides Sueo%e 


14065 O46040. 


MAINDEC-11-DERHAS-A 


RE O4SSle 

045526 
140i4 45526 
15 Q45&3e 


$ 

8 o4s634 
S o45640 
14021 o4ses4 


i80ee O45654 
i40e3 O45650 


14037 O45e66 


ERROR MESSAGE 


o0040S 


104401 


000405 


317746 
104402 


1944C1 


000406 


017746 
104402 


104401 
COO40s 


O1774E 
104402 


104401 
000405 


017746 
104402 


104401 
000405 


017746 
104402 
005037 


104401 


Bio08 


‘013746 


136246 
ae 
136220 
045870 


136214 


045720 


136166 


045750 


— 
Ww 
o 
o- 
mM 
oO 


045776 


136074 


045100 
001223 


001114 


001116 


MACYL1 27 (732) 





agit: 


aig 


oT 


-995: 
$: 


TYPERR: 


22-SEP-76 15:11 
TYPEQUT ROUTINE 


PAGE 266 
90 
/ RHLA= . 
JRHLA, = (SP) 


ORHCC ,-( SP) 


9S$ 


348 
/ RHECI= / 
JRHEC!, -( SP) 


975 


S¢$ 
/ RHECe= / 
DRHEC2, -( SP) 


93¢ 
59g 
/ R¥DTs / 


JRHOT ,-( SP) 


IRHSN, -(SP) 
aePRITEM 
SCRLF 
RO,-(SP) 
JASITEMB,RO 
13 


SERRPC, -( SP) 





;;GET OVER THE ASCIZ 


;GET READY TO TYPE RHLA CONTENTS 


3; TYPE ASCIZ STRING 


;;GET OVER THE ASCIZ 


;GET READY TO TYPE RHCC CONTENTS 





3; TYPE ASCIZ STRING 
;;GET OVER THE ASCIZ 


;GET READY TO TYPE RHEC! CONTENTS 





33 TYPE ASCIZ STRING 


33:GET OVER THE ASCIZ 


;GET READY TO TYPE RHEC2 CONTENTS 


7; TYPE ASCIZ STRING 
;;GET OVER THE ASCIZ 


;GET READY TO TYPE RHOT CONTENTS 


3; TYPE ASCIZ STRING 
3;GET OVER THE ASCIZ 


:GET READY TO TYPE RHSN CONTENTS 


;CLEAR PREVIOUS ERROR ITEM 

i eran RETURN” & “LINE FEED” 

tBTCKUP THE ITEM INDEX 

z4 ITEM NUMBER IS ZERO, JUST 
YPE THE PC OF THE ERROR 


IE SERRPC FOR TYPEOUT 
;ERROR ADDRESS 


ee 





<4! ae acetate 


DERHRB. SRC 
046044 


TUTUTUS-+ + 8 b+ 
Mo O.WONMUcUaIne-O 


046174 
O46176 


Bue s55 


104402 


000402 
013146 


000764 


912601 


o4e210 


M 
ERROR MES 


046204 


0 


Cc 


138: 


2s: 
3s: 


4$; 
Ss: 


68: 


- 
. 
7$: 


98: 


10$: 
11S: 


P=76 15:11 PAGE 26 
TYPOC 
BR ios 
DEC 8 
ASL RO 
asl RO 
ASL RO 
apo BSERRTB.RO 
CMP RO. JePRITEM 
BNE 1 
CHP (RO)+, (RO)+ 
MOV RO a4PR1 TEN 
MOV {R0)+,¢ 
BEQ 
TYPE 
WORD 
TYPE 1 aCRLF 
MOV tRO)+,4$ 
BEQ 5§ 
TYPE 
.WORD 0 
TYPE SCRLF 
MOV Ri -(SP) 
MOV (RO)+,R1 
BEQ 
MOV (RO)+,RO 
TSTB ss ( RO) + 
BNE 7§ 
MOV 2(R1)+,-(SP) 
TYPOC 
BR 13 
MOV J(RL)+,-(SP) 
TYPDS 
TST (RL) 

_ BEO 9g 
TYPE 118 
BR bs 
MOY (SP)+,R1 
Noy (SP) +" RO 


PC 
ASCIZ 7 / 
- EVEN 


GOS 





3GO TYFE--OCTAL ASCIICALL DIGITS) 


ee USY THe INDEX $0 THAT IT WILL 
WORK FOR THE ERROR TABLE 


;FORM TASLE POINTER 
sHES nga, ERROR SAME 
POP RO OVER EM AND DH 


;SAVE NEW ERROR ITEM 
:PICKUP “ERROR MESSAGE” POINTER 
SKIP TYPEOUT IF NO POINTER 
gate} THE “ERROR MESSAGE” 

ROR MESSAGE” POINTER GOES HERE 
"CARRIAGE RETURN” & “LINE FEED" 
‘PICKUP "DATA HEADER” POINTER 


OUT IF 0 
TYPE THE “DATA HEADER™ 
!"DATA HEADER” POINTER GOES HERE 
:"CARRIAGE RETURN" & “LINE FEED™ 


SAVE RI 
:PICKUP “DATA TABLE” popuren 
:BR IF NO DATA TO BE TYPED 
:PICKUP “DATA total POINTER 
s"OCTAL” OR “DECIMA 

BR IF DECIMAL 

:SAVE 2(R1}+ FOR TYPEOUT 


:G0 TYPE--OCTAL ASCII(ALL DIGITS) 


; SAVE a(R1)+ FOR TYPEOUT 
;GO TYPE=-DECIMAL ASCII WITH SIGN 
1S THERE ANOTHER NUMBER? 
BR _IF_NO 
:TYPE THO(2) SPACES 
; LOOP 


RESTORE R 
s CARRIAGE 1 RETURN" & “LINE FEED” 
: THO(2) SPACES 


Pertti titrt et ttt tit ttittittttiititirttititititterttttiettttts 


ERE KARR AREER ERE RARER AEE AEE AERA E RE EE EAA AAR REARS RARER EARER ERE EER 


“SBTTL BINARY TO OCTAL (ASCII) AND TYPE 


5 EERERERERE EERE RA RAE LER ARERERE RR RE RE RE ERA AERA R REL ERERERERRRERER 
‘ATHIS ROUTINE IS USED TO CHANGE J 16-B8IT BINARY NUMBER TO A E-DIGIT 


S*OCTAL (ASCII) YPE I 
s #STYPOS---ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 


MOV 
TYPOS 
BYTE 


NUMBER _AND T 


NUM, -( SP? 
N 





s;NUMBER TO BE TYPED 
s3CALL FOR TYPEOUT 





TO & FOR NUMBER OF DIGITS TO TYPE 


















MAINDEC-11-DERHAS-A MACY 


77 PAGE 268 
DERHAB.SR 1g BINARY TO OCTRL (AS 


, Hore 18:11 
T) AND TYPE 



























14123 :% .BYTE M ::M=1 OR O 

14124 :% s;2=TYPE LEADING ZEROS 
igs : ::O=SUPPRESS LEADING ZEROS 
14127 xS$TYPON----ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
14123 *ETYPOS OR $TYPOC 

14129 Hite 

14130 :% MOV NUM, -(SP) ::NUMBER TO BE TYPED 

ee TYPON ;;CALL FOR TYPEOUT 

1si33 $1 POC-—-ENTER HERE FOR TYPEOUT OF A !& BIT NUMBER 

14135 2 i MOV NUM, -(SP) ::NUMBER TO BE TYPED 

aie x TYPOC *:CALL FOR TYPEOUT 

14138 O46210 O17646 o00000 $TYPOS: MOV (SP), -(SP) $ sPICKUP THE MODE 

14139 O46214 116637 900001 O46432 MOVE =: 1 (SP) SOF ILL LOAD ZERO FILL SWITCH 

14140 046222 112637 O046435 MOVB  (SP)+.SOMODE+1 ;:;NUMBER OF DIGITS TO TYPE 

14141 O4p226 O62716 odocode2 ADD #2, (SP) :: ADJUST RETURN ADDRESS 

14142 946232 O00406 BR sTipoN 

14143 046234 112737 000001 O46433 STYPOC: MOVE 1, SOF ILL :3SET THE ZERO FILL SUITCH 

14144 O46542 115737 000006 O46435 MOVE #6 SONCDE+! -:SET FOR SIX(6) DIGIT 

14145 O46250 112737 OO0005 O46432 STYPON: MOVE #5; S0CN $336 THE ITERATION COUNT 

14146 O46256 010346 MOV Bec e0) :SAVE R3 

14147? 948260 O10446 MOV RY, -(5P) : SAVE RY 

14148 O46262 O1OS46 MOV RS’ -(SP) VE RS 

14149 046264 113704 o46435 MOVB SOMODE+1, RY -:GET THE NUMBER OF DIGITS TO TYPE 
14150 O46270 095404 NEG 

1415: O46272 062704 00006 ADD RR ss SUBTRACT | 17 FOR MAX. ALLOWED 
14152 O46276 110437 O46434 MOVE = RY $OM0DE “SAVE IT FOR U 

14153 O46302 113704 O4&433 MOVB = SOP ILL ET THE FoR FILL udiTcH 

19158 046306 015695 ood0le2 MOV 1a(SF), Re s;PICKUP_ THE INPUT NUMBER 


14157 46316 o00404 " 3R 33 £60 Do 


N°T & BLANK 
14178 O4640& 000744 BR es 


MSS 
14158 046320 006105 2s: ROL RS FORM THIS DIGIT 
1415S O46322 006195 ROL RE 
14160 O463e4 906105 ROL RS 
14161 046226 910503 ak. MOV R5,R3 
14162 946330 006102 33: ROL R3 3397 $8 OF THIS DIGIT 
14163 046332 105337 o46434 DECB +  $OMODE ;;TYPE THIS DIGIT? 
14164 O46336 190016 BPL IF NO 
| T4165 046340 042703 177770 BIC 8177770,R3 ::GET RID OF JUNK 
| 14166 O46344 OOL0C2 BNE 4§ :T 
| [4167 646346 605704 —Tst) RY  sbPoness THIS 0? 
14168 O46350 001402 BEG S$ : YES 
14169 O46252 o05204 4S: INC: -R¥ :: DON’T rae BESS ANYMORE o°s 
14170 646354 052703 soconso BIS #°0,R3 ssMAKE T HIS DIGIT ASC! 
| 34171 O46360 052703 coco40 Ss: BIS #’ 'R3 MAKE ASCII IF NOT ALREADY 
| 4176 O46364 110337 O46430 MOVE 3,83 PI CAVE F YPING 
14173 046370 104401 046430 TYPE 8 ::G0 Spee Tis DIGIT 
14174 O46374 105237 O46432 7$: DECB  - $0CNT ::COUNT BY 1 
14175 O4€400 003347 BGT 2g ::BR IF MORE TO DO 





2 eee 15:11 


a eT aia “ae 
ERHAS. SRC BINARY TO StTAL ( 


biEEee 000002 oc0coo4 


ae rr a 0 eee eee 


s RESTORE RS 
ssRESTORE 84 


ii Bee Phe Back FOR RETURNING 


; RETURN 
ij STORRGE FOR ASCII CIGIT 
;; TERMINATOR FOR TYPE ROUTINE 
+ QCTAL CIGIT SOUNT ER 

Ba FILL SWITCH 

;NUMSER oF. DIGITS TO TYPE 
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O46516 


046576 


12737 
2737 


ee |? Loe | oe] oe | oe] oe) 
IW £OtueH 
ES 
NSOOOOww 


00f1ee 


MACY! 


1 
POWER DOWN AND 


046652 
000340 


132366 


O4SE65 
132320 


O46516 
000340 


047520 


27 (732) 


UP ROUTINES 


000024 
000026 


c3c0e4 


o000e4 


000024 
000926 


KOS 
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.SBTTL POWER DOWN AND UP ROUTINES 


$ g RRL RAR ARH RA FERAL AAK ARAL ERE REL RAKE RAE RAL RA LAE LER LER ALLE FERRER 


AE, 


1$: 


SPWRMG: . 
SPWRAD: . 
SILLUP: 


SSAVRE: O 


SPOWER: 





-ASCIZ 
EVEN 


TIN 
ISTLLUP JePWRVEC ;;SET FOR FAST UP . 
#340, JHPWRVEC+2 ;:PRIO:7 
RO,-(SP) ;:PUSH RO ON STACK 
R1;-(5P) :;PUSH RI ON STACK 
Re, -(SP) ;;PUSH Re ON STACK 
R3,-(5P) ::PUSH R3 ON STACK 
RY, -(5P) PUSH RY ON STACK 
RS, -(SP) :;PUSH RS ON STACK 
ISWR, - (SP) ::PUSH JSWR ON STACK 
SP, SSAVRE 23S 
#SPWRUP, J#PWRVEC':;SET UP VECTOR 
“es ;;HANG UP 


© EHX XKAK KEL K KEKE KEK EEE EK EL EEE EEE EE EE EEE EEE EERE EE EEE EE EEES 
POWER UP ROUTINE 
SPWRUP: Mov 


#SILLUP,J#PWRVEC ;;SET FOR FAST DOWN 
$SAVRG, SP :;GET SP 
VR6 ::WAIT LOOP FOR THE TTY 
SSAVRE ::WAIT FOR THE INC 
1§ se WORD 
(SP)+, ISWR POP STACK INTO JSWR 
(SP)+°R5 >:POP STACK INTO RS 
(SP)+'R4 ::POP STACK INTO RY 
(SP)+'R3 ::POP STACK INTO R3 
(SP)+)Re *:POP STACK INTO Re 
(SP)+; ::POP STACK INTO RI 
(5P)+'RO ::POP STACK INTO RO 
#SPWRON, JRPWRVEC':;SET UP THE POWER DOWN VECTOR 
$340, J#PWRVEC+2 ;:PRIO:7 


“REPORT THE POWER FAILURE 
$POWER :;POWER FAIL MESSAGE POINTER 
(PC) +, (SP) ::RESTART AT BEGIN 

BEGIN ::RESTART ADDRESS 


3; THE POWER UP SEQUENCE WAS STARTED 


ls 3; BEFORE THE rear DOWN WAS COMPLETE 


. ::PUT THE SP HERE 
(15><12)"POWER" 
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047050 
047052 


047252 
047254 


044124 


COOd&4 
044124 


MACYL1 27(732) 
POWER DOWN AND UP ROUTINES 


020105 044122 
pel eae penne 


047111 + 820107 
051040 020123 
O545e4 042520 


020104 O47516 


047440 020122 


C20105 o44lee 


054524 042520 
020104 O47516 


032062 031060 


020105 pn tee 


O4ell& O41511 


22-SEP-76 15:11 PAGE e7e2 


p ERR RR EKER RRR R ERR EERE REE HR ERE ERE REE EEE LADDERS 
SERROR AND MESSAGE TABLE CONDIMENTS 


RERARKRRKEZ KK 
EMI:  .ASCII 
/ASCIZ 
EN2:  .ASCIT 
.ASCIZ 
EM3: ASCII 


SERRA RK AK KARE EK AEE EERE EERE EE EHAE ES EERE REESE EEE EEREL ES 
/THe RH BASE ADDRESS WAS 172040 INDICATING AN RS BUT THE DRIVE TYPE/<15> 


/DID NOT CONTAIN 0 OR 1 OR 2 OR 3 OR YW 


“THE RH BASE ADDRESS WAS 176700 INDICATING AN RPOY,S,& BUT THE DRIVE TYP 


/DID NOT CONTAIN 20020,24C20,20021,24021,20022, OR 24022/ 


“THE RH BASE ADDRESS WAS 172440 INDICATING A TMO2 BUT THE DRIVE TYPE/<15 


A oe ada 





O47 111 


030460 
020105 


031060 
031060 


052502 


MACY11 27(732) 
POWER DOWN AND UP ROUTINES 








020107 


050131 
ores 


000060 
044122 


026060 
026061 


030061 
041511 


O4eSe3 


052440 


o44440 
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“DID NOT CONTAIN 142010/ 


/THE RH BASE ADDRESS WAS 176300 INDICATING MORE THAN ONE RH DEVICE BUT/< 


/THE DRIVE TYPE DID NOT CONTAIN 0,1,2,3,4, 20020, 24020, 7<15><12> 


/20021,240e21, 20022, 24022, 142010/<15>< 12> 


“INDICATING NO RH DEVICE PRESENT/ 


“THE UNIBUS TIMED OUT FOR EACH OF THE FOLLOWING ADDRESSES, INOICATING/<1 





MAINDEC-11-DERHAB-A 
DERHAB. SRC 


059002 


050174 
050200 


050366 
050372 


O5045e2 


042116 
wah j 3 


000115 
043101 


0425Ce 
043101 


042101 


043101 
046103 


O44 122 


MACY11 27(732) 
POWER DOWN AND UP ROUTINES 


020131 
020104 
047040 
000122 


o4e524 


000042 
O4eSe4 


041104 


040522 


020122 
0 


051111 


047125 
046525 


Oe01l2e 


040440 
047111 
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EME: 


EM?7: 


EM10: 


~ASCIZ 


-ASCIT 


.ASCIZ 


-ASCIT 


.ASCIZ 


-ASCIT 


/NO RH ON THE SYSTEM SO ARORT PROGRAM/ 


/AFTER AN RH CLEAR (RHCS2-BIT #5) RHCS2 DOES NOT HAVE ONLY IR/<15><12> 


“AND UNIT NUMBER/ 


/AFTER CLEARING THE RH AND WRITING ONE WORD INTO RHDB AND/<i5?<12> 


/READING IT BACK, CAUSED RHDS TO HAVE WRONG VALUE GIVEN IN "SAD”/ 


/AFTER CLEARING THE RH AND WRITING ONE WORD INTO RHDB AND/<15><12> 





NSINDEC=1-DERMAB-8 


co0c 
arvarvast 
e+e 
wom 


an 


3190 


ATTATUAT CAEL Cal ealea lel ear tal ia! 


mis 


9-88 QOOOOOOMIOOL!S 


MIMIMOIMOOWOc 
ae See eee wee Sed wed wee et Oe ed ed ed ed ed ed 


4 tutu © DP EE 
CON LYON £0°O 


t) 
an 
e- 

- 


ACYL] 27(732) 
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POWER DOWN AND 


~~) fo tue-- Couey 
LIU Ve-- te 


dU fue UE 


OOMMOOCtUr- 


tI le 8+ oo -<6¢ 
an 


Coomnoonm 


t 
£ 
oe 


‘Elurouue Aitae 


leo +b fo 
oo vores £0 
—O- ho 


ofmur-OLo 


<o 


z 
i 


041042 


043102 
046103 


047524 


READING IT BACK, CAUSED RHCS2 TO HAVE WRONG VALUE GIVEN IN "SAO" 


ORERERR* a) 
ff 5 = 
cts “ 


PFTER CLEARING THE RH AND WRITI! 


/RERDING IT SACK, CAUSED RHCS1 TO HAVE WRONG VALUE GIVEN IN “BAD” 


/RFTER CLEARING THE RR AND WRITING ONE W 


CK, CAUSED RHCS3 TO HAVE WRONG VALUE GIVEN IN 





a ee ne en ee 


po a ero re ES 
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POWER DOWN AND UP ROUTINES 


51153 101 0S2106 OS110S EM12: .ASCII “AFTER CLEARING THE RH AND WRITING ONE WORD INTO HDS @NO/<1E><12, 
Bie mune Gee Bug 
liv4 $203 pi cess 
reins Habits 53495 §44s22 
O5izic0 OM4S24 O43S16 O4T44O 
persis Sieeis essiit pase 
sates? fev ACs Boils Barres 
Ssis40 O47101 O0ss04 ole 
51245 22 O40505 o44so4 JASCIZ /READING IT BACK, CAUSED RHBA TO HAVE WRONG VALLE GIVEN IN “BaD” 
S5iss2 o43sig owsGHo Oeoi24 
55izs0 O4dS5d2 O¥ssc3 O20054 
O5is66 O40503 O515e5 d42i05 
51273 051090 041110 20101 
O5isoe O47524 O44040 05310! 
051310 2010s OSil27 04711? 
O513is O20ic7 o40Se6 952514 
651324 Seoros O4450r O4ese5 
§5i332 020116 547111 Oe1040 
D5I346 ONoSo2 o21104 600 
051345 101 OS2106 OS110S EM14: .ASCIZ VAFTER CLEARING THE RH AND WRITING ONE WORD INTO RHDQ ANO/<1S><12> 
B5125> o4144o O4s614 O5110 
Bé1360 47111 Oeolo7 O44124 
B5136— 820105 ossiz2 Oyo44o 
51374 4211 OSHH4O O44S522 
Bsiso2 544824 O43516 O4THHC 
Biwi O4251g 053440 OS1117 
1416 020104 O47111 047534 
O51424 051040 O42110 2015 
651432 947101 OOgS04 2 
051437 122 4050S o44s504 \ASCIZ /READING IT BACK, CAUSED RHBAE TO HAVE WRONG VALUE GIVEN IN “SAD”. 
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/WITHOUT WAITING FOR THE FIRST "GO" TO COMPLETE. THE FOLLOWING REGISTER/ 


/DID NOT CONTAIN WHAT IS IN "GOOD"/ 


/RH CLEAR WAS GIVEN A 2 WORD WRITE WAS DONE FROM A LOCATION/<15>+ 12> 


/TAGED WRFROM AND WITH BAI (RHCS2 BIT #3) SET AT THE END/<15><12> 


/OF THE WRITE THE FOLLOWING REGISTER DID NOT CONTAIN WHAT IS IN “GOODY 





mi ~ 43~ 
(2.000 
a le 
fuL 


tw 


+00 +b <0 +6 <p <p <p 


nou 
momg 


fie--Tocom 


20 
Me LOMWwUU 


PRPPER BP 


TP a 
0-0-6 = (sl0-- 0 Ute 


“0+ +00) +0 +p 06 +0 <6 +p <6 «+ 
ATTATEATEATTATEAT EA ATP a balsa al : 


“6-8 
MPU os 


Tupiyo—e--Fus 


YOd Eto - Nhe 


+e 


& 


“sor~s- 


rs . 
££ = C= UI + 


te Le 2 


J 
Corue-o Su 


SVCTVCFUETUCTUCHVCHUCSTCSTEs Cr TOr Gry 


Oe ee ee ee ee ee ee ee ee ee 


fut 


RAL EEE 


wu 


Oo 
t 


Whe OO) SOREL Cafe Cat tOHU Ee Gate te oeeD 


*CO).000 NOU 6 ore €1.000 SOP UT Go 


Oo0O0o 


thfure flor & 


om 


POLO TOFU UFO FUT UFUFUF OF Uru fURUEOrUt 


© 
1 oO 


a] 


crvarvary 
u 


yee ee ee ee ed ed ed ed ed ed ed ed ed ed ed ed ed ed ed ed ed ed ed ed ed ed ed ed ed ed ee ed ed ed ed ees ee ee ee ee 


vurororurororurorrr 
ULOTUPUTUTUTUTULOTUTU LIU & b&b ht 


PEAT EATOAL EAL OAL OAI OAT CREAT ea] 
Oc 

o- CVC 10-0 - CO 0-+ 

Tue Core Ue 

LUNIVOTwWoO 


[ 
tu 





MACY] 27 (732) 


POWER DOWN AND 


fy 


o124 
Ul 
i 


a” 


320 «(Ct 


fre tod ft 


~ 


“Je~- TUC D0 fue (Cte - . 
ru. CA Ldtde Lotoes “iwugM oo 


Wr ao 
Ofuru 


-Ln Mt et cut crotu 


D42510 


2-SEP-75 15:11 PAGE 288 
NES : 





FH CLEAR WAS GIVEN AN IPCK BIT SHOWN IN “ZPCK" He 


ZEROS WERE MOVED INTO PHOS. ON READING RHOS THE F 


N WHAT IS IN "G 


‘ZEROS WERE MOVED INTO SHDS. 


‘THE FOLLOWING REGISTER NOT CONTAIN WHA 





- 





MACYL] 271 


c 
Aye 
rc 


Ajee 


POWER DOWN AND 


uw wont 


POOP COC KEE CCG ee rere 
un 


fw 


tate 


CepCerleneentep 


2S GIGIGIGIGIGS 


GIT (9.00) 


“CI000 


Cite Gtueorcty 


vu 


£6 


‘©: 
+0 +0 +e ~o- me 


any 
suru .£ 
6-0-0 +p <9 


~- 


sotestertetes 


stesververiesy 
ae oe ae 


ob 4 “0 


UNI ££ 4. 4: 
mo 


cePUPureru eure rere 


© 


or 


rer 
0-* 0+ 0+ 2 0-2 + + << & 2 9-0 p= B+ 8+ 00 ho hs po ey ey ee ee 


WW) LILITUNOTUTUTUFUTUTUTUrUTUr-s-ee-e— pene oo 


Ww 
“ITU of ~3™) 


ed Seed Bed ied Sed Bid eed Deed ed ed ed ed ed ed eed ed ed ed ed ed ee ee et 
1S £ Gof 
1 POU LPORLE 


*t- 
45444 44 44 44 de fe 4 bs | P44 44 45 4h 4 he 44 4 44 44 4 
ufufu 


urufurun uy 


a SIN I tpl arin EL e beth nd «ba Ae ad 4: a 
oun £2 Gore C000 “0 0 Gotu (9.000 NOP U1 Go fue- .000~30" 


ree om 
mou 


et es | 
MIO 90 


++ 44 mu Porarararar 


=O ++ 0 = 2 8 8 8 bs 0 2 


mururorururururururofrururur fof mofururo 


7 
COLON ONIONONT ON UNTO OT ONO 


coco ooOCcO ao COCO CO)“ 
SOP ol dure Cno0o 


(732) 
UP ROUTI 


020 


o06522 
p47040 





AR CLERR WAS GIVEN. A WRITE CHECK/<15> 


LLOWING REGISTER DID N 


‘RH CLEBR WAS GIVEN. 


/WAS DONE THEN ANOTHER RH CLEAR WAS GIVEN. THE FOLLOWING & 





‘DID NOT CONTAIN WHAT IS IN "GOOD" 





L<DERKAS-A 


MAINDEC- 


Li MACY 11 
DERHAS. SRC POWER DOWN AND 


S23 11? 020116 


Se: 

2: S Seless bacisy 

: 44 ae ae S 
eso I 2OTi4 

Se 569 3 920063 

S2 $& 3 


foe 
20000 

PE 

o-< 

-— 

£ 


is288 O&1 

15283 o615 

15295 D615 

a . 

ie5gh Bei 

15293 0615 

15294 O615 04 
Be 20s Sin Bue 
43E3 ; 

1e5e> AEleIs Goeso? O12 
15298 061613 lee o43505 
15299 061520 D4eSe4 O2eDlee 
5309 051525 O020104 O4S16 
1530] 961634 047503 052116 
15302 O61642 20116 O44127 
15303 081850 O44440 020123 
1E358 6165 21040 O47507 
15355 O61664 O00042 

i$306 061656 O4%eS0e 947506 
i530? O61674 O42040 Os2101 
15358 Oei7o2 OS1124 947101 
18308 061716 081105 041440 
15310 O681718 O80S15 O42116 
15311 061724 051501 OSe040 
i53i2 061732 O12 

1313 061733 ide 920105 
15314 061740 O42526 Celllb 
15315 061746 2010S O050lee 
15316 O6irss O94522 042526 
15317 O&i762 O80Se4 O52524 
15318 O&1770 O42522 044507 
15319 961776 051105 O42040 
15320 062004 905015 

15321 062006 O47516 20124 
1S322 062014 OS2li6 O44501 
1S323 OSe0e2 O8412e7 052101 
15324 0629 C201le3 047111 
12325 062036 OQN750? 042117 
15326 Dse044 O42e5Se 3 
15327 O42080 O52101 
15322 O€20E9 O51124 047101 
15329 CEECEE OE1IOS 041440 
15220 062074 O40515 O4ellé 
15331 O62102 051501 O5e040 
1332 962110 Ole 

15333 O6e111 102 o20105 
15234 Os2el1& O42526 Oe0llé 
$5a35 O62le4 20105 051522 
15336 Ob2ise O84Se2 O4e526 
15237 O82140 O4052e4% OS2e524 
15338 O6e146 O4eS22e 044507 
18333 O62154 051105 O42040 
1E340 Oe21E2 O06015 

1524] Ceeie4 047516 oeo1e4 
iSs4e O&el72 OCS2i16 O4$4501 
18343 D6ee90 C44i27 05210! 


97( 732) 


UP ROUT! 


920101 
0 


047506 
0472111 


O4eil) 
047503 


O4eE111 


047503 
020116 
o44440 


G2-SEP-76 15:11 PAGE £90 


NES 

Em124: .HSCII 
.ASCIZ 

EM132: ASCII 
ASCII 
AscIZ 

EM133: .ASCII 


-ASCIT 


oASCIZ 


/NOT CONTAIN WHAT IS IN 





DO? 


/ON A SILO TEST TO TEST CSL RHCS3 BIT 810 THE FOLLOWING/<iS>< 


/REGISTER OID NOT CONTAIN WHAT IS IN “GOOD"/ 
/BEFORE DATA TRANSFER COMMAND WAS 70/<15><12> 
/BE GIVEN THE RP ORIVE STATUS REGISTER DIO/<15><12> 


/NGT CONTAIN WHAT IS IN “GOOD"/ 


/BEFORE DATA TRANSFER COMMAND WAS TO/<15><12> 


/BE GIVEN THE RS DRIVE STATUS REGISTER DID/<15><l2> 


"G00D"/ 











MAINOEC-11-DERHAS-R 


DERHAB 


uw 
+S. 
© 


0 -+ b+ b= b= 0-2 0 B02 pe 
OVUNUNTUNUnNUnUnotinuanoias 
W030" U1 Gorue~ (9.000 


O€2704 O47S1L 


nb 3372 asooNe 


MACY11 27 (732) 
SRC POWER DOWN AND UP ROUTINES 


929116 


021104 
Raaeas 


047111 
043505 


047507 


051511 


oosois 
os1S11 


42104 


042111 


CS2105 
020123 


006507 
051511 


042117 





22-SEP-76 15:11 


oASCIZ 


EM137: .ASCIT 


EM140: .ASCIT 


-ASCIT 


~ASCIZ 










FO? 


PAGE 292 


REGISTER ADDRESS IN QUESTION IS IN “REG. ADDR" 


/ON WRITING AND READING THE REGISTER IN “REG. ADOR™/<15>< 12> 


/TT DID NOT CONTAIN EXPECTED: VALUE/ 


/RH CLEAR WAS GIVEN AN IPCK BIT SHOWN IN “IPCK™ WAS SET/<15><12> 


“ZEROS WERE MOVED. INTO RHDS. ON READING THE FOLLOWING’<15>< 12> 


/REGISTER DID NOT CONTAIN WHAT IS IN "GOOD". 





MAINDEC- 
B.S 


COUNUNON ONO UNTONOnN Ua 
COCONUT OUT ONTO at 
Rovio oie wi 
—-O.00™ 


NOU cu 


nn Eee 
Prema 


064104 


064572 
964577 


11-DERHAS-A 
RC POWE 





041501 


0 
040502 


101 


R DOWN 
é 
2 


021104 


042040 


27 (732) 
UP ROUTINES 


053524 


047105 
041042 


020122 
2 


040440 
047111 


053105 





‘AFTER CLEARING THE RH AND WRITING TWO WORD INTO RHODB AND/<15><1z> 


/RERDING IT BACK TWICE, CAUSED RHBRE TO HAVE WRONG VALUE GIVEN IN “GAD"/ 


/AFTER CLEARING THE RH AND WRITING TWO WORD INTO RHOB AND’ <15><12> 


“READING IT BACK TWICE, CAUSED RHWC HAVE WRONG VALUE GIVEN IN "GRD" 


QUT BUT/“<15><l2> 


“A DEVICE BASE ADORESS DID NOT TIME 











DERHAB. SRC 




















15607 065121 
15608 O&Sicé 


15608 
15610 065120 
15611 065136 
15612 65144 
15613 O65152 
15614 065160 
15615 O65iE6 
1516 965174 

| 15617 Oese0e 

| 15618 

| 1619 oes204 

| 15b20 Obsei2 
15621 de5220 

| 18622 OeSee6 

| S623 065234 

| 

| 


J 
! 
| 
‘ 


MAINDED<11-DERHAS-A 


041511 


120 
052104 
041520 


o42105 
041520 


050131 


004503 


052411 


beseng 


052011 


047507 


MACYLL é7(732) 
POWER DOWN AND UP ROUTINES 


020105 940502 


052502 
041440 


047505 
053105 
e 


o51505 


044122 


Belis2 


051505 


042117 





ee-SEP-7& 15:11 PAGE 295 





~ASCII /THE CORRESPONDING VECTOR DIC TIME OUT.7<15>¢12> 


~ASCIZ /HIT CONTINUE TO REPEAT VECTOR TIMEOUT/ 


EM147; .ASCII /A DEVICE BASE ADDRESS DID NOT TIME OUT/<15><1l2> 


~ASCIZ /BUT NO UNIT NUMBERS HAD APPROPRIATE ORIVE TYPES/ 


DH1: ~ASCIIT /PC RHDT / 
DHS: -ASCII. /PC UNTBUS ADDRESS ON WHICH TIME OUT OCCURREL 


CHE: «ASCII PC TEST NO RHCS2 = RHCS2/<15>< 12> 


GOOD BAD’ 








MAINOEC-11-DERHAS-A 
DERHAB. SRC 


065514 
065515 


065554 
O&5S555 





041011 


MACY11 é7 (732) 
POWER DOWN AND UP ROUTINES 


042101 


004503 
051011 
044122 


004S17 
041011 


000 


o4esey 
042119 
41104 


047507 
042101 


042524 
041510 
041510 


047507 
042191 


004503 


041011 


O04S03 d42S24 
041510 


041510 


047507 


041011 O4e2101 


004503 
051011 
O44 1e2 


004517 
041011 


042524 
041110 
040502 


047507 
042101 


004503 O425e4 
041110 


C41110 


047507 


041011 O42101 


004503 
051011 
044122 


004517 
041011 


O4eSe4 
053510 
041527 
047507 
042101 


004503 O4eSe4 


042110 
047516 


006502 
047011 


22-SEP 


DH?: 


DH11: 


DH1le2: 


DH13: 


DH14: 


DHIS: 


DHe4: 
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-ASCIZ 
ASCII 
-ASCIZ 
ASCII 
.ASCIZ 
ASCII 
-ASCIZ 
ASCII 
ASCIZ 


~ASCTI 


/PC 


/PC 


/PC 


/PC 


“PC 


/PC 


TEST 


NO 


NO 


TEST 


NO 


TEST 


RHDB 


GOOD 


RHCS1 


GOOD 


RHCS3 


GOOD 


RHBA 


GOOD 


RHBAE 


GOOD 


RHWC 


RHOB/<15>< L2> 
BAD/ 
RHCS17<15><12> 
BAD/ 
RHCS3/<15>< 12> 
BAD/ 
RHBA/<15><12> 
BAD/ 

RHSAE/< 15>< 12> 
BAD/ 

RHWC/“< 15>< 12> 
BAD/ 

RHDB = RHDB/<15>< 12> 
GOOD =: BAD 
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042510 
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O4101i 042101 


OO4S03 042524 s <.ABCIT . RHDA/<15><i2> 
051011 042110 s 
O441ee 040504 


004517 047507 ~ASCIZ —G BAD/ 
$720 041011 O42101 
065726 
065727 120 QO04503 O42524 DHIO4: . : RHCS3 = RHCS3/<15><12> 
051503 


OO4411 ° BAD/ 
041011 


O42Se4 $ RHCS2/<15>< 12> 


051503 


OO4411 , Z BAD’ 
041011 
O&6044 


O6E047  ~—=«:120 042524 ne RHCS1/<15><12> 


051503 


004411 : G BAD/ 
o41011 
066114 O42101 


066117 120 042524 os . RHBA/<15)<12> 
os2153 7 

O04613 

051011 O41110 O06501 

3 C11 o47516 oo44l1 ; BAD/ 

047507 O42117 O41011 

Ob61e2 O42101 000 

DE1ES 20 OO4S03 o42524 aoe RHBAE’<15><12> 
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066570 
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O44411 041520 ‘ 

O4W4lee 040502 

a 040502 

uoris O4411 sASCIZ / NO GOOD BAD/ 

41011 

OO4S03 O42Se4 OH113: .ASCII /PC TEST IPCK RHWC RHWC/< 15>< 12> 
O44411 041520 

O44 12 

053510 006503 


047516 OO4411 -ASCIZ / NO GOOD BAD/ 
042117 041011 


000 
O0450S O42Se4 DH132: .ASCII /PE TEST RHDS1 RHDS1/<15>< 12> 
Q0S1011 O4e2110 
051011 042110 


004517 047507 -ASCIZ / NO GOOD BAD/ 
041040 O42101 


OS4S03 O42524 DH135: .ASCII /PC TEST PC OF BIT WAIT REG/<15><1l2> 


004Si7 040527 ~ASCIZ / NO WAT FOR ADDR’ 
042101 051104 
O04S03 O42524 DH137: .ASCII /PC TEST REG. GO9D BAD/< 15>< 12> 


004517 042101 -ASCIZ / NO ADDR DATA DATA’ 
O40SC4 040524 


020103 O20040 DH146: .ASCIZ /PC BASE VECTOR/ 


O20040 Oe0040 DH147: .ASCIZ /PC BASE ADDRESS’ 
042104 O4eS2e 
00 


se EVEN 


-WORD SERRPC,SBDDAT,0 


001126 oo0900 
SERRPC.RSCS1,RPCS1, TMCS1,MIXCS1,0 


DTl: 
OO4046 oOO4CS0 DTS: 
o040S54 000000 
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O&6576 OO4ESE 001124 DT:  .WORD SERRPC,TSTNM,$GDDAT,$BDDAT,O 
O&E604 2g 00000 
DO¥SS OO4EEY D724: —.WORD —SERRPC, TSTNM, SILON, SGDDAT, SDDAT, 0 
2. DTI: .WORD SERRPC, TSTNM, IP, SGDDAT, SBODAT, 0 
DT10S: .WORD SERRPC,TSTNM,IP,SGDDAT,$8DDAT,O 
DT106: .WORD  SERRPC,TSTNM, IP, $GDDAT,SBDDAT,O 
DT135: .WORD SERRPC,TSTNM,WAITBT,WAITPC,WAITRE,O 
: DT137: .WORD  SERRPC, TSTNM,SBDADR, SGDDAT, $BDDAT,O 
DOS324 005326 DT146: .WORD  SERRPC, TESTDV, TESTVC,0 


005324 000000 OT147: .WORD S$ERRPC,TESTDV,O 


DF 1: .BYTE 
DFS: -BYTE 


‘ DFE: BYTE 
DF24: .BYTE 
DF104: .BYTE 
OF105: .BYTE 
DF 106: 

DF135: 
DF 137: 


DF 146: 
087012 DF 147: 


900001 
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1663 1677 1691 1705 1719 1733 1747 1761 
1838 1847 18s3 1873 1887 1303 1919 1925 
1983 1985 1995 e001 e097 eoig 2024 2030 
2081 e032 2098 2109 2115 e128 2134 2140 
2183 2189 2195 2291 2274 2284 223s 2301 
Eade 2347 2353 2359 23t$ 2378 2331 2401 
=f 3S 
4264 4706 $039 5501 5924 5345 6778 7018 
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149598 
149838 
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3350 
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3489 





147358 


148538 
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3352 
S441 
34912 
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i, * oe 
FATT = Sosesd 
FMTe = QO0040 
FMTe2 = 010000 
FMTY = 00000 
FMTS = 000200 
FORBAE 00477 
FRHNN 005436 
SLAVE OOS44E 
FTYPE UO0S4O& 
UNITN O053765 
FUTABL 004134 
FVYECTR QO5416 
GIVE Oo500§ 
ONS = FHRHEE 
$0 = 000001 
GRY = 909010 
HCE = 000e0 
HCI = 002090 
HCRC = 000400 
HERADD O05516 
HT = 000011 
IRE =6= 002000 
IE = 008100 
ILF =o = 0000 
ILLEGL O042e06 
TLR = 00000 
IOTVEC= 000020 
IP oo4sb2 
IPCKS = 000001 
IPCK! = 000002 
iPCKe = 090004 
IPCK3 = 0000ic 
Ts = 006100 
= 004000 
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3392 . 3594 
3663 
3651 3667 
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3236 3242 
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3611 3620 

12851 i2g69 
1308 13382 
13932) 3=6. 135480 
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KIEDRI= 172902 14258 
TPORZ= 


MAIND aC eet = 
DERHAB. SRC 


= 0000le l2e838 13640 13646 
f e 7 
LTRY 005320 30518 3228%  3532%  3543% 


MCPE = O20c00 26108 3708 3716 3742 
= 090400 a5e5¢ 8022 8268 8497 gBSHi 9799 8843 


ae) 
10009 eSt3s 3293 


NML = 000300 7428 13299 13339 


NMRHS 004764 _ 29708 : 
NOGO 004644 * 292l1@ 7730% 13149 13203 13349 13461% 
NOPERR 904134 2833s 2. 
NTY' YPNT basses 30658 3281% 3284 3288 3326 3550% 
OCYL = 100000 27808 
= aaacas egiss 
OFREY = 00020 e7c3e 
OFSETC OO4165 23lse 
OF 100 = 000004 27188 
OF200 = 000010 27198 
CFeS = 000001 27168 
OF4OS = 000020 27208 
QOFSo = 000002 27178 
OFe00 = 900040 e7el 
OPERSE 040654 1304S 13688 
OPT = 020000 cbse a A na Toe 
OR = 000200 25638 4216 4406 4582 4592 4618 4644 4855 4864 5250 5260 S672 S682 
£094 6104 6517 6527 7757 8497 9799 9075 9308 3541 9774 0 1S22 





1s 11750 48611863 


PAR = 000010 5 
PARE7O= 000114 30958 3159%  3160% 
PARIT' 7736 3153 = 128668 


po ne eee 
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7197 
3704% 
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gui* 
— C= PUTO bb 
Goer 


PLU 
PRE = 
PROG 
PRS 
PS 
Poy 
| ROCHE 
ES 
| 
|P 
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12912% 
12925% 


13261 


13047% 


2141 


3117% 


7242 


3784% 


12948* 
12929% 


133093 


138958 


12753% 


14239% 





13114% 
12930* 


13320 


14057 


13046* 


L4e40% 





14249*% 14255% 
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REINTO O04424 
RELEAS OO4L44 
RESVEC= ores 
RETC 70 





RHSA 034064 


004130 


RHCA = 04114 
RHC =. 904100 
RHCCA = O41 16 

1  OO4de0 


RHCS2 004070 


RHDA DO40E6 
RHDB 004102 


RHDST  OO4OEE 
RHDS1 004072 
RHDT 004106 
RHECL  O04124 
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7096 7285 77e7* 7833% 7899 8123 8359 8661 8963 $057*  90ES* 
9298% 9430 95e3% 9531% 9663 9756% 3764* 9896 99894 10102* 10216* 
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3293 332 3553% SSS 3719% 3745*  3798%  3800% 1 3805 3823* 
3830 3877% 3903% 3956% 3981% 4035" 44O061% 416% 44l4e% 4194 4215 
4405 4436 4559 4581 4595 4617 4647 4688 4827 4854 4867 
5249 5263 5480 S642 5671 5685 5903 6064 £0593 6197 $324 
6530 6756 6937% 7013% 7014% 7046 7197% 7245 7760 783e# 7861 
8261 8313 8500 8544 8615 8302 8846 8917 9078 9151 9311 
9617 9777 9850 10038 10152 10265 10378 10446% 10495 10611 10725 
1106511179) 1de47* «11296 §8il4i2 §=611525 1639 11753) 11866 «=: 11934*% 11983 
e342 = 12461 12579 1265e% 12701  12908% 12905* 13926 

3879% 3880 3885 3905* 3906 11 2s4 44SS 4727 Sill 5525 
6803 7072 7266 7632 7650% 7656 7780 7891 7975% 98003 8101 
8337 B448* 8478 8565 8639 §750% 98780 9867 8941 9109 9175 
9566 9641 9799 9874 9999 10lle 102e6 10339 10484 10571 10686 
11006 38611139) 1125S) 11373) 11486 Ss 11899) 11713) 18a?) = «11942 )=Ss«1e06S)~—s «12184 
1eS40 = 12660 

7203 =13145* 

4228 4Y401% 4418 4577% 4613% 4629 4669 4W947*% 4891 4913 4935 


13974 
13ie4 


3301 


13233 13260) §=613271 =: 13287 13330 193355 


3330 


13249 





EEE ee 


MAINDEC-11-DERHAB-A 


DERHAB. SRC 

R4 =%000004 
RS =".0000C5 
RE =*090006 
R? =%000007 
sc = 100000 
§C1_ = 000100 
3€10 = 001000 
SCe_ = 000200 
SCe0 = 002000 
SC4 = O00400 
SEECOM O04164 
SERCH 004146 
SETBIT OO46S2 
SETSIZ OQO06S1ée 


SILONM OO04664 


SKI = 040000 


SLAVE OO46ED 
SLYPR = 002000 
SN = 000930 
SND1 096114 
SP =%000005 
SPACFD 004202 


14165% 


MACY11 27(732) 
CROSS REFERENCE TABLE -- USER SYMBOLS 


14170% 


14171% 
3274 
14 


14179% 
3104% 


3716 


22-SEP-76 15:11 


14172 


3105% 
3742 


14263 


PAGE 311 


14181% 


14564 


14244 
3662% 


13501 


7980 


14308 


14263% 
14147 


37 34% 
40 
13556 


8216 


1 
14266 


14149 
3740% 


Lasoo 


8521 


3867% 


i457 1s 


141S0% 
3741 


33919% 


4111% 
14148 


8823 


14151% 


375i* 
aa" 


4ile 
141S4* 


11390 


3907 


5284s 
5827% 
5602% 


3250% 


14 
L4246% 





14152 
3793% 
3952 
4131# 

14156% 


11503 


14247% 


14153% 


4 
14158% 


11617 


4 
14159% 


11731 


1 
142S6% 





MAINOEC-11-DERHAB-A 


DERHAB. SRC 


TOTALA 
TPVEC 

TRAPVE 
me 


040652 


000057 


OOS246 


130448 


60514 
3540 


MACY11 27(732) 


3702% 


leb3e% 
3538* 


3577% 


22-SEP-76 15:11 PAGE 313 
CROSS REFERENCE TABLE -- USER SYMBOLS 


3273 
3331 
3325 


13003 


11231 
120378 


3142% 


3554 


1 
1579e 
12759 


12823 


3332 3377 §61S806 15808 


3333 
13008 


3339 
3529% 


3940 40178 4018 40988 4099 41838 
Sel0# Sell 56308 S631 60528 6053 


10776 
i 115758 1169 
121568 le2748 12275 123938 l2Sle% 


4917% 
8204% 
10563% 
12157% 


S2ilx 
8441% 
10778 
12275% 


4373%  45S49% 
7968% 


10S48* 
12038% 
15804 


3940* 4018% 


11463% 11576% 11690% 11918% L2334% 
15794 15796 15798 15802 


12788 








INDEC=11-DERHS 
ERSAS. SAC 


= o0n904 


001126 


"Gs 


S 1 
CROSS REFERENCE 


Oc me 
- c 
mw 


I~ IO £ Ge CO: 
WUT £ inom mor tam 


~ 


Ue & SE Eph Fhe oF 
~js0°e-TU0D" 3" 
La + + a 


(He-~ 3 





a0 
+ 


accu 
£0) 
~~ 
wa 
UID 


5063 
S409 
5760 
= 
510 
S275 
S412 
3! 


res 
va 
ey 


+ 
a 


os 
£UVororos 


ra 
. 


: Jt £ 
UO £OWwOoww 


“Ooo 
Le Se 


oe 
IINNOO COOK MMUwe 


mM 
3 JOC Uli 
> 


rs 
ite 
* 


+ 
We 


aco ~j~I> 
voou 
un 
ton 
ca 


ob 


Ld 
uo. oOo 


OGIU1LO0D?-O + 


+ 


co 


c~ I 
CMOWIUILITU.OWOM £6 
un J -Gor J 
uw) aw £ te 
ra 


+ 


ah 
wOwdm 
Woe OGM Ue. 
ono “4 . 
Ss = le F & 


. 
VIUILICOGDO+-- 
0.0.0.0. 00 WCOMMmMmMm~j~ I>. rorwuodw 
a ICO" sfc imuom 
OL MW Ifo 


WU 0000: 
- 4 . 


oO 
wv 
[ve] 
* 


i 
Ccr- 
LWW 


ow 


rs 
W~IUIIe DD 

© u 
-- 


* +. 
rs 

Me 

> a 

Ca > 
oOoOwo 

Toe (NULOC 
~ a 
a 


+ 


i 
& 
es 
Ea 
+ 
- 


2 
Me 
+ 
> 
ULI OE 
O0ownD 
™ 
ae’ ont ‘ene * 
> ~*~ 
3 
qjwuio 
oe 
“a 


a 
4 4-00-3090 


£OW 
+ 
(2 
wmw 
» 
UOMLUIUMIOOMTOWU 


* 
oh 
WwW 
+ 
ae 
at 
~ 
a 
4 


oh 
£ 
tJ 
- 
fj 
oe 
+ 
re 


> 

Me 
— 
Ae 
a 
* 


A 


+ 

iF CC 

Pee 
’ ’ 


4 

Ge ON) 
oOo 

le 


* 


* 
0+ D+ B+ BB+ 0 0+ bb + Bo b= bb 0 ho he 


Gatulutulie—s--e- 


0 0+ 0 0 0 0 0 bo 0 he 
CIlururulur—o--t—-s-->--(9 


ss 
TJ 
furuo 
* 
~ 
ca 
wa 
‘wo 
~*~ * 


+ 
+ 


0 - b= = 0 BB 0 > 0 bh 9 ae 

UILITUTUTUT UL ~b--2-0- 2 - OOOO 

MOW LMOOOW cMMO 
futIGo-30" 


O--Mmag 


Oo NGCr ££ 
o-- 0-0 © 8 0 bs & + = b&b 


UWNGsTUfurUulue- eo +--+ e- COC 


Wii 


Le > 


0 0 0 & + 0 Bb 9 be 0 = 
i 
MOG).00IG) £ MOM UOMO OWwO@M Wi 


Ce eee en ed ee ee ed ed ed ee ee ee ed ee 
ITT oti. Ror 
ee ee ed ed ee ed ed ed ed ee ee ed ee ee 
mye : mw o 
Se Sd EU OS 
0-= B= 0 = 0+ 0 0 -- O00 0-8 = 0 
ee of) 
Lee WUT NWP WOMOr- OUD 
Ww 
func 
woOc$ 
ile 
— 
o— 0 & = 0- + 0+ &-= b+ 0 
ww 
¥ Oo 
U1 £ oD 
ONVMOWUMWWIOVMOTOr-UMNOO © 
> - 0-6 - 0-6 —- 0 - & - ob 0 
UMUFUTUTUs— bb - o0-- 
“INVMIGIe- wW 
wr + £r0 
fufue-ruo 
0 b+ 0 0+ = OB 0 bb 0 > 2 0 = 
UWUTUlUU s+ ob o—- - (FOOOO 
~J.OUTGI- 0 oO £m 
0.007 O od + aw 
OWwOVwlis £.0OWUTIO ao 


* 


ee ee 





MAINDEC-11-DERHA-8 


Coed med ed ed ee et ed et ee 
= UT Cae PUTO TUTUlUe— COMiGse-- GIGI) 
Le £2 CO IMOMOMOWwUuIMuI 

Or OUI Oe OO) ies) 


‘2 
LOU crotm 


MMU» Or 





Wurm 


~200 
~) 
a2 


119% 


o-+9-- +0 bb ee i +e b= b= 


WWIGITUG) £UWIL) 
o ow 


£523 
&704# 


é 
-- USER SYMBO 


PasE 317 


13884 
* 136438 


13488 
12805 


13884 











MACY11 27(732) 


MAINDEC=11-DERHAS-A 


CROSS REFERENCE TABLE -- USER SYMBOLS 


CONIUN LIM OwW SUG Tue 
UO UNM) £ 
tw oot 


TU 0+ b= b+ 0-0 tetrad hee ty 4 


0 = b+ b+ 9 Bo ho bo he ho he 





@ 


35 





~ [40-40 40-41 





00000 


Mm Ch .0~I £rue-o 
“ICL £ OUT +-- ~- 
LICIGIC OO 
a oe 


MUM) + > QOOOOIW0W 
oO 
Oo 


0 b+ 0 0 0 bb be ee 
mse suow “J 
Ww 


-£0£uU1 
© 
bad 


13182% 


138428 
12495* 


3184 
40818 


oo 
OR 
LOOWOW LF £L£OO salen’ 


UMOr-uU.0.0 £0" 
Oouwme- 


“IG 
oer 
ed 
a OK 
Ph wl Mow 
- = 


WON Crue 00M 


TUe--0— 9-2-8 <9 (OOM 
o 
@& 
fj 
Ae 
Oe oe 
coo 
Wt. 
* 


—_ 
tf 
w 
he 


= b= b= b= 0 bs 0 bs bo 0 bo 

oO 

: Oo 
ufo 
oo 


0+ 0+ © B= 0 = bb bo oh ee 
fururulue—e-- oe 
jWwuow Ry tr @ 


wo 

ah 
~ . o=0-- 
OTUTUTUTUe- ob 0 +2 Cc 
~Ju © «oO G@ 

Jou -0OCI0" 


Mmacquawaru PAR ets 


Lat) 
“IUNIGITVO DM NIU) 


0 b+ b+ b+ b+ b= bo bo 80 po ho 
~~ 


“IO? EG) OCD PUG 

0 -= b= b= b= = b= b= bs bo ho po ge 

UWUrUrUlUN)— — er 
uty oO 

rye] : . a’ ray) 

UWUTULULUI Us b- ob o- 


JIru@ or 


w 
c 








HAS. SRC 


$TKOSR 


O440S2 


901152 


0$7014 


MAINDEC-11-DERHAB-A 
DER CROSS REFERENCE 





fo 


136538 


MACY11 27(732) 





22-SEP-76 = 15:11 


TABLE -- USER SYMBOLS 


136818 


7997% 
8519# 


1 
13884 
157878 





PAGE 


13718 13746 
13871% 13898% 13700 
8233% S8472*% 8774s 
8S21x 
3182 32088 3540 
000 erage 4081 
S2ide Sé09 56308 
7461 74778 = =©7581 
84408 98727 87428 
007 100888 10190 
1077S# 10877 108898 
11563 115758 11677 
lel63 leebl l2e74s 
12744 =: 127528 
13646 
13646 
13646 
WY2ee3e l4224%e8 142258 
1344S «134780 =—s «1.3500 
13774 137788 
14221 
13828 8136338 13634 
136448 
14224 
14153 141888 
13968 13988 14008 
29888 29938 29968 
20788 #30798 3080s 
33918 33978 34038 
12828 1e846s 12e8Sex 
13508 13509 135758 
139258 139338 139418 





GO93 


320 


13706% 


142268 
1350S 


1 
139438 


35788 
4 


14528 


13 
139578 


aes 


142298 
13869 


139658 








37018 


142308 
13884 


654 
13eas 





3765-37818 «38420-38538 
43728 45260 45482 «= 4798 
890 63108 7167 71828 
78228 7953 79672 3199 
9496 S138 9729 97468 
10429" 19535 10S47e 19650 
11217 112308 11397 1135$s 
119178 12024 120378 12044 
12499 185ic2e 12519 2617 
142318 142328 
26308 25178 29188 29638 
3015# 30498 4 3050% 3074s 
107312) «= 312231578 
6008 3604e 36152 36218 
130648 130798 13389s 13400s 
136558 137788 13773 13786 
150288 18037" T4ilde 1525) 
























DERH 











SITOSL «=ic$l# 


0-+ b= 62 b «p= po pe 
wo 


ENDCOM 
ERROR 


MHINDEC- api DERE 
AB. SRC 


ALLREG 12618 
14017 





MACY11 27 (732) 





CROSS REFERENCE TABLE -- MACRO NAMES 


ish 


11675 
3683 


b+ pb bh 


13913 


3764 


1a 


13937 
10414 


22-SEP-76 15:11 PAGE 322 


13945 


10533 
12259 
4080 


13953 


10648 
12378 


13961 
10761 


12497 


13969 


10875 
12615 










13977, 13985) = 13993 
10988 38611101 1215 


14001 
11335 






















MATNDEC-11-DERHAS-A MACY11 &7(732) 22-SEP-76 15:11 PAGE 324 
DERHAB. SRC CROSS REFERENCE TABLE -- MACRO NAMES 




















11820 11830 11830 11870 117098 ii7ee Lire? 11764 ii? 4 118238 11838 11857 11877 11897 119398 
1i954) «= lis74— sl 1201 le0518 e076 12096 leil6 lelse 121808 12195 le2l4 1e234 i224 12298s 
12313 12333 12353 12373 124178 e432 1e4Se le47e2 12492 125368 12551 12570 12590 12610 126568 
lebve = le6S2 Ss le7l3)—12734 


$ is 
RHCLEA 12618 3703 3783 3861 


SAYTST leble 
SCOPE 1e79% 3207 3577 3700 
6051 71 


SETPRI le 1384# 13735 


STARTT peohe 3701 3781 3859 


TTSTNO le618 3702 3782 3860 
6311 7183 7358 7478 
TYPEIN le 13848 


TYPNUM is 13848 














DERHAB. SRC 
TYPOCS lt 
TYPOCT lt 
TYPTXT 8 
3444 
3601 


SSCMRE 14468 


OWE 

DE 
SREAD it 
ROAZ lt 
SSAVE lt 
$5B20 1 
$520 1 
SSCOP 1s 
SIZE 1s 
SSUPR lt 
STRAP lt 
STYPB lt 
TYPO lt 


he criemnssiosaseioapiieddieahcnatieh 


MAINDEC-11-DERHAB-A 





MACY11 27(732) 
CROSS REFERENCE TABLE -- MACRO NAMES 


13848 


22-SEP-76 15:11 PAGE 32S 





3218 3223 3233 3240 3246 3387 3394 3400 3406 
3468 3476 3484 3492 a708 soue se 3343 3359 





‘ oe os ee mm i nn ee + ee ee ee + NS 


MAINDEC-11-DERHAB-A MACY11 E7(732) 22-SEP-76 15:11 PAGE 326 
| DERHAB. SRC CROSS REFERENCE TABLE -- MACRO NAMES 
.STYPO le «612518 14113 
A ls 
















MSINDEC=11-DERHAR-A MOCYLL 27(732) 22-SEP-78 15:11 PAGE 330 
Degas. SRE CROSS REFERENCE TASLE -- PERMANENT SYMBOLS 
HALT 133: 332203383505) 2 EHY «1342913438 13885) 13875) 4esO 14274 
INC sesh SCP 3335038534848 = 12802 «1349S ) = 13539) 13708 «= 13718 «= 137431 38es 
sNCE SDD lsb4E =: 13858 
ew! ers 
Sup 1395 140 02152 3217 SE 2% 893308 l2 Mes 32 HHO O84 
= SSS20 355300 S84 «LEST «= 128z2 12854 «= 12300 «13685 91390 z 
sk 3183704784 = 3862 49 4020 4101 4188 4375 4551 4@! $213. S63 05 6476 
8513 7185 «7380-7489 E00 «= 7781077310 782S 7834 «= 7870) OHS = BEDE BEB] 84433583 
sms SSCS 59S 19082292 30l S52 S16 S525 554585 745 
S758 $7) 912 9978 ©9992 1009) 10105 10205 10219 10318 10332 10432 10457 19650 ides 
1066S 1087S) «10778 «= 10782 «1089S «= 10306 «11005 «= 11019) $1118 «11132 «11239248 )=tias2113BE «1 14es 
1187S 11578 «11592 «1189211706 «= «L18D0E «= 11870. 11920 «11935 «1204 «12058 «121s9 12178 «=: 12277 122% 
12386 1E515 1E5iS = 12534) 13834 1SES4 «EBT? = 13614) «121 «13628 «= 13EBE «= 13876 
“Oy sos? 03104 = «108 = 31100 Ld «= Ld «0 313) 140 IS. 16S ss 3117, 'sB2L S22 = 312503128 
3127031283133) 3135) 3135 = 3137) S14] 4231433144345) 3188) 3155) = 31ED) = 318 
3ise 46s. 3208 «2S 321!) 20s 2120S 321903214 = ss«228)=2Ss«d3229'sid3230,'sid3238—iSHSCC(iéi«‘édSCié‘*dHSESCitéi«‘*éSE]SCti«é328G3 
3e85 358535670327] 872 7374) 38D = 3281 )= 386 S87 000 301 «= 08 2S Bz 
$si2 314 3325033283328 2S 3300 320 32 3303809 0CCHI HR EQ 5S 
3sel0 33630337 7H Hl 82088410 $36 344334510458 HE7 PS 
B83 SS] OUH990C HL 06 6-H BX 6B CUBSCUBYS COS 3555 3578 «= 579 'sis5800— 3592 
3ss2 S34 36050 EIS 6510557 00 SEED KER é 3668 3669 B70 040s 3871 
%7e 3701 3702 3708 3709 3710 3713 «#43719 «#8493718 «8(37el1 4 437220 «637870 9738s 3741 
S745 0374?) 3748 2S s37S3 «3781 «= «378223788 «= «3789S 3788S 3783)s3754)S 3800 s380i §=s a0 )=S 3? 
3818 3219 3823 3625 3826 3830 3859 3060 3066 3067 3862 387] 367 397 3879 
388) «3855 03897) 3858S 38939033805 80E—sS511— 8399405479508 
3320 3853039593563 87S 7897738810 30830884) 3988 = 401? = 4018 «= 4084S 40S 
oes 460s «29S si=w3Ds—i‘d] SiO?) ss«43S8)2SsisHDSsiédSS SiSERSCti‘*#NSS7~=—siCsE LS) OES SS 538 
4099 4105 41064107 10. LL «= 124138 = 419414368? 
i495 41500 uy8S)i84 0S] 540s GC (asiSC ass? as EHERSCti‘édSEDSCiédQY=Ss«D 
4301 «4317 4319 's«433S)0Ss«3370— «4372 ‘3730 «43810493840 ssi 
we55 471 73. 44BSi]SsiS57—SiHGCiSHQD:«SsigSGSC(‘iéwSSS:«SsiédS??~——siSDsi‘édESN:«C=‘«éKRS*SL’ 
He27si#GPSEHHGH? GE? 4BBSisESS «SBS Si7GECi‘#dN?ONGSiCP2SCiCP27)PHDCFHStC«é«G77GL 
4763 «47? —si78!)0fssB160OiB17?—s—i«BEY Sse? 0 BUS «SiN? sR SS SE?)0S@S? 20S siS9)Ssiédu@Sg]—StiédGQDG 
4311 $913, 493148334935 4853 48554957 49758774878 45974895) S00! = cis 
Soil 0 S0E3 5041 «= S043 S045 = S065 S068 «= 508g «= 5030) sing Sill 1290-51320 5158 S18: 
Sits 517] 5219 «= 5211 «= 5218S S222 52410 S42 52435260) 5635284 = 5286 = 52a8 = 5308 
Ssi¢ 05312 «= 5332 S334) 3360-5356 0S 53580 5360 |S S380) 53820 S34 S404 = 5406 «S408 )=— «S428 
S330 5432 SHES HSH HSE 547754800 «S501 «= $503 5523) SSisEsd4 = S546 = S555 0 S557 
S52 ESE = sSe300s«sSs31 «= 5639 0S St4e )= Sete 564 «= SEES SEES «= 5685) = S7oT 2570S) S711) S732 
7. fs. fe 7e7CfsC«dS7GGCtéiE 777 5781 5783 5803 805 S807 $327 S829 583: 535i 
Est2 S55 Se75—sSe77)ssSe79—Ss«S900) «S303 S524 5326 SHE SHS | SSE7 «= SSE9 588) 535. 
co0$ «= «G0ll «= sg0S2 = sE0S3 «= «0k «= 6064 )= «8084 = GOSS = ESE «S104 )§=ssGio? = bi2gSsb13d)-sGi32 = bis? 
£155 6156 S176 6178 6180 6200 6202 6204 6224 622 S228 «6248 «= 6259062520 8272 
c274be7E E296 e388) E300 S21 6384S EHH?) ESE? = 6369 8398 «= 8380) 8408 8511 
ss20 8422 sEN73 8474) E482 b4SS 6505 = 8508 «= 6509527) 6530) gSS2 CC G5S4 = S556 577 
e575 ESB] = St02 )= gf04 = «05S ke?) bed 6bS] «= Gb52 0 h54 = kER CP? EP 6681 6702 
6704 €706 6727 6729 6721 #£«96753 #6756 778780) «6801 «©6803 0 6823) 82S 8845 = 847 
£867 «£669 sSIDSssSSii = g919—s£92] 0 e941 43482964382 gSS7 | gS8S 702 7014 
7018 7020 7043 7046- 7070 7072 709% 709% 7118 7i2e0 3 7ise 8 6744) =«67182 671830067183 
7e0l 7203 7epe 7224 7e42 7245 7264 7266 7283 7295 7302 7304 732! 7323 733? 
7358073657370 737207390 739274147416 7377439 PHP? HFG HSS = 7HSD 7582 
710 oie Fa Fem = 7e57- 754 8 #87ee7)6 CUS lCUDS COU MHI0sCHl2- ” Cie NCPR 
7677 7679s 7718 = 771977267727 7730 7738 «= 77407767) 7b? 7780 Bee 7823 
7231 7832 7839 #7841 7858 7861 7879 «97381 «97897 7999 867815 7 867933007935 367 
75668 7972 #97977 «#297980 8675982 §6«8=—s7997)~=Ss« 001 ~—Ss«20 so22 8025 s0Si 3 8074 scr? 3699 
Bi0l ie 123 #143: e145 9165 8167 8203 8204 #8208 #8213 18 §218 9§233 §23° 





PRGE he 
vids 


22-SEP-76 
BcRMANENT 


DERHAS. SRC 








0) OL 


MOWT FT OOM. OUMMO, OM MOMK ——"OM+ Oot. OF uct. int. OO Oa6amMmM 1-9 .p 
ALTAR Retr Teh RUST aT UL IT aT 

- ~ ‘ 4 ~~ it 
DWOMWOMMOMMMMMMOOIOVNII0IO 4-4-4444 SCUCMUUMUMNMUOUNUUMOMMOMMMMMMs tT 7 7T 
OG GE 8 OF Od Od Od kd Od Od Od OH Od Od ad Od Od OE nd ad Od Od On Od hd we bo he ene Hod 
3M HAUMOOOT. TMNT HOMO OMNMWOMe, ~ UL T U4 4H MMMUM NON TAN 
O-—- OO OOMALD TE. OAUMNKK DOM UMint. OM «gt WMO O-~ TF HAMOUMMMM ONT oO 
MW WO O00 int OCCT LD. OO 0 int oo DNOMKMMTNODOMO-0F Ninh MOMOD—T1U08 
MOOMMMOMMMM MM OOI0CI0CIC ICID +++ Aa tet 4  LINICUOUINIC ph p> up-sell hh phe at Ff rar 
OE kd dd i Od Od Od OG OG Od nd Od ad Oh nd Hd On mh Od nd wed oh d wh bof oF Hoe 44 

] 
ey 

WO MO) +O FT WU. OT te CU Tt TMT lh -NOIMUOMOMt.OOndNj-—«, DDO AUOM—«sF 
COW WMV FT THM AUMNWOM Umit. OP UF NMC, MNS UH-MON0M——F OF To 
MUO OWT uit. OY 4009 TUN. OO) int. mo OO TNWOMO-1 Fs INlNt. OM —nss 

MDOMDMOMOKTMMOTMOMMOGOIIIOIOO 4-4-4404 4 “AAU OQUUMUOUAIMUAUMMMIMMMMMM: 77 
atta et ta etn et hee ett eae et ete ete em ee eae oe hae Tae ae eon ean ean ak eae ae Tae ae ae ae ae ae ae ae ae ae ae ee ae 
OP. OO OO.) 4 9 4 FT O-1N MO —-1N M+ DIND NOM 0O-F MUO Oa~OUININGO or Tt-oOm 
tilt ae EP TEA Sg lt ice paps he E aby Lt ab = Peat he Sad TS ~PaMNDOT HOT ONOM “Mins Fw 
MOT Wl. MOOT Wh. OM U0 FINO. COO-“UM Tink MMO—uTinwr PO AUMmMNinNt. Bisse s 
DOMDVODMDP MOM OMMAIIIOIVIVIDIO? 4 44 4 0 ee UCU CU UICUMOUUM MMe MMMM? TT + 
saat het ett et etn eet et ee eee ete eae eee eee heres ea ee rae re an eae oe Trae rae ae ae ae ae ae ae ae ae ae a ae a ne 
SOM MOAN —42F At CUNO M NOC). 0M TOWO M.-F HOO Te MO—-UTOMOwoNM 
Lt Or OM FOMOT MOF Ol. DOU FT OK MO AMIN OM 4AM THRO VOMMOM 40 F FO 
MOT Wl. TOUCMINT. OM) TIN Wt. OOM int. MOO TiN ood- 4{UMINLNT.$. OM O-—-1j OJ 
MOBMOMKNOMUTTMMOOVIVWIOOO -1-4-4 4-44 ~SNMUMUMUMUUANUMUMMMMOMMOMMNM? 7 tr Tr 
: Ok Gd OG ed OE ad Oh Od hk dnd nd a nd nd Od nd Od nd end wd hd oh wb wb od oo oo 
ff FEUIP OWN DOM. DOMMDOIMD 40M. 007 MUM MR WMUlMt. ur “~MwoK wMMMoO-- 
C~MOl~ ~ADMOOMOUOM «Us int DOF OM MO--iNt. OOo T OM “~QNOODO000 MM) 
MT Ol. MNOMUCMNDOCOUMT NW POM Tint MOO 15 inuwre TO —-UMNNIt. OMOO—ns08 
DOOM OIEKMMKMPMVCOVIIWIIO 44H 4 HA UU UUUUUMMMMMMMMMm + ra7T 
POO AR SSSI e SOG ed ogo oe ee tee Pee ee nee oe oe Po pa po poe pee 
WMUNO TST TOOMOOT Th. AF O.0- OAT OOATOUNMOOR w Nt U-O.OOf OCO--9OCt.o7o 
oo. he ee eS i St. IT Ul? .-OM—-TUNnODMOoNn a O07 T.0CO4MOOD 
OF D.. TOUCMINDOMOUl FT iN. DOAUM TiNIMMO—--utnwr “U9 TIN. OOOO—u1 
DOOMMIS NUM OUMMOIIOIOI1IOIN 4-4-4 A UUM UMUUNUMMOMMMMmMMmnms ~ a 
sta hele etn ne teeta Tec he ha eres a cee Tee, eae Loe ae ran Teak ean Te Tee a Te re ee ae ae ae ae ae a le ee 
MOUDMCH.C- DUMOMODOO. NOM OMMOrOmMr~ “WINE M.OWFT MOOOMiNs OMOMINtK 1.00.0 
AN - ANTON ANA DOOM UMN. MO--~UMMne OM—3UT NDOOUTINVUVOOOT TMDOMOUOOWM 
MF VW. DOUMND. POUM TNO DO-UIM Ft NOMMO—-c Ft Nw MO FT iN. OMMO--Utu 
DOMDDOKPOOMKMN MMMOOI III O) 4-4 4 0-4 4 te 4 CUNUOUCUOMUMUUMMMMMMOMMM? rat +r 
ta Ieee tet hetee ee ete ete eee Deaton eae eae het oes oe ee oe eae Doe Poe hae ae Dae De Dae be Dae Dae tae Dae tae any ae er a Ey 


UIT UMNOIMOUNGT Ot tr .0O7 ~lOcu 
% = Ree ties Uh MOCO O-—«4 


MICH O01 -T CIMOANGAN ANT AONND DAMN M.D ONION --41 —4 

‘a a ne t~ 4D CUNO. PA CYUOL OO. PO -- UO NYOOWT OF. 

t C) 9005 FO. PC) 4109 FJ OE. ONC) -46 04-7 i. NO- 0*- 4U T i 

IP OPOPOHMPOOC DOVOD OD ODODE) wt 6 rt ot ett tet CUO OU 
WE bd dF Od Ok nd 8 OE nd Od Od Od ed Ob Od nk md ede 


PO WNNG ul. oO. oOINnanm 
MT TOMITONNMIN- roTD 
(UT UM.) -40 Tit OOo 
PITERTFALFITIV LAD ATRL AL I ALT ATT A ac. MOC Oe 

a4 


OMOUCIM ORO OWULNLN C4 LNT = 
LADUE CE cpr 


$355 
23 


PUT iN.) 4087 Lt. OM 
pr uh-ar-jhe-bar oor rj l MOMMMMMMOE: 
eee ree ear Dear ar ome Doar ar ae ar ar Dear ar ar ar Per hoe Por oe Dr ree ee 


‘Seeq 
14389 





MAINOEC=11-DERHAS-A 


* 4 
wD 
~ 


UU £6 GIGIG) LUI 
c sfUruUn ey 


et et 
! 


0~< bpp = 9 + po -e- 


- 
Cd £9 COTM COUTUTUN ££ GGT G2) UT U UTE: 
£0 £0" 
4 


als 
vu 


=) 
PINOT WOUTUTUTOTU ££ so 


ey et et ed ee et ee eee 
ed eed ed ed ed ed ed od ned 
= WUTUGIUTONUL SE. 6 GIT GIGI UU 


o£ 0-4 IUIGS 
pee 3 at 


< It 
m <a 


-- 


-o- 


“ee £OOM- UOWUCMUIO OWMO 


- 


o- 


CoP cnvOnunan C4 2 GGG 


. . . . . . . 
mmm oo woo 


© toto 


4 <r 
“00 I> DD 
UIONG = TUOOUTUIOOUIGI0D O00 £ Mae 


CIT HO O00 100 00 OO fue 6 rudo 
INNO OUND .£ ONO. SOO 
WNW WOM MO £2.00 GI OD OUTO TU 


MACY] 


MS c ( 
FERENCE TABLE -- 


3315 
13087 


1211 
3918 
lers 
14223 
3255 
13687 


S463 


0+ b= 0-0 -+ 2 0 
GIGI 


22-SEP-76 15:1] 
PERMANENT SYMBOLS 


4077 
13570 


wor OO0O0LOOM 


WOnomuw 


4158 
13504 


b= b<8-- 





© .00).0-£ 


+ 0 b= bb b= bo po 


o-+ 0 +00 = 20 

0-0 +b bb = ee 
UU. 
£Or-O.w- 


“IMG 

ow 
Ule-GOTU d+ pty A oe gr 
a 


Ule-Goru UU 
MWLOw 
@OLOwW 


-- 
— 


453 
3 
53 
455 


a) 
O-~Itur- 0Mo-3 
=O O-- OO 


g 
1 
g 


2 
0 
2 
3 
e 
y 


Oomow uw ££ 4 
(OUWU OO Ul lias 
MMnafub 

oe (OUI de 








0 = b= b+ 02 2 b= & 2 9-0 b= = hs + fo B= he eo oe 


+ b= ~* -= 82 8 + eh 2 9 8 hs + be b+ B+ 0 he 0 2 Bo Bo Bo ho pe Be 


2 GIGI UCI CI GITUTUTUTUTUTUTUTU bb 6 8 8 OOOO Ow 
n co 7 ws es r 


oon 

00 ~I £ UITue- 
— OUTIUC 
-—~“JUIGD 


IMUIWITY 
0-6-0 £0 


-G)?-(9 000 “IO U1 .£ fue C9 
duUltotur-OOw 
OW Uru £aUK 


£ 
Po 
oOo 


TUPUTUTUTUTU & 8-8-0 (OOO 
[ 
- 


Cook ed 
b= CO CIT GIGI G09 


MACY11 27 (732) 
CROSS REFERENCE TABLE -- PERMANENT SYMBOLS 


WO IP Horo 
+00 oe UT 
ot 
OPOw 
Moore @ 
OIC" VIG) COUT 
fu? £ = 0.00TU0UTUO ITU wo 


wooo 
@ ££ WGsfurue-w 
~GITUU1£ OOO Le 
101.6 UNG)e- © 
£.0OWNOO £m IMwo 


WwW 
'-POOMvM+s£ 


TOTUMD 9 b+ = = OOOOOOOOT 
oOum ~ 


GWIMO 00 YOU1.£ Gore 
£e-OU1£ ££ O 


~— WL OUlLOOrr~ Com 
* > b= 02 b+ & 0 B= b= §-— bs 9 = § 2 0 & 2 fF * B eB 2 


a 
NINO OOWON WMO weer 


Ob 0 0 0 0 8-2 0 hb = = 00 be 0 bh be ob 8 
MWMOWD SOOdOW0OOrOa 


SS MWWGITUIMGITMU1.00 Je Go OO Or - £orT 
<= Fate tet prtatt tt 4 


mM 
co ffrr-ca 


PAGE 333 


Rat irra tet trie] 


Me 00 
4-ru doa 


MODdOO-ulUuG 
SNE K-WWOWDDKDO0O0 Or -MVUWMOWOOWW) C—O ce-um 








+ WmMe--O 
OODIMM £ UI 


0b bb 
O~2OU1O 30 Je PMUPUTUU UIC +-COoUuTao’ aru woo” 


£ GIGIGIGIGINUIVU MPU PU TUTUTU MU 6-0 -- 0 b&b b= b= 
0O IL £ WOO NIMUILIIUe- O.0MMuW 
Ne .07-3 £0 TU 


<< 
fue 
Py et he 4 ae ru 


l 
I 
1 
! 
l 
1 
1 
l 
i 
1 
1 
1 
1 
1 
l 
I 
! 








OQ 
NIMUGIMUG 
7.00 “JU1.E 0) OwWuiad 
» WI OMOOUIWO £00 oD GQ ‘? 


+ MUI 000 Le 
- 
* -00 
WGI 09.0) 
8 o 


oUF 
I™MIUIC) Ow WC UNO 
UII GaUMO oe 


£™NWMWt) 


co~ 301 
34 
wore 








MAINOEC=11-DERHA 
REHAB 


CROSS REFERENCE TABL 


WO... OU oo 
*Gd0-= 00 LO UT AE: = C8 


mou a 
Or UICOTU UI ~ es 


E Ge 
et et Tia 
£0 .£00 


“ 


0 b= 02 b 2 bo a hh he 
= 0 (90 
“IU1-£ GJfur 000 
Ni wo 
0 fu 


) @R-SEP-76 15:1] 

-- PERMANENT SYMBOLS 
1497 1498 Hi 
3114 3116 i] 
3242 486.3248 )3=—s-3390 
344 3508 su3 
3844 a8 842 


B92 «8964 9006 
$263 3265 $278 
9513 9543 «9565 
9835 $849 =«49873 
cis «10017 10034 
0131 10148 10151 
0261 19264 10284 
0377 «10397 «10416 
0513 10515 10535 
0630 10650 10652 
Q763 10765 10773 
0379 «10887 10883 
1000 11002 11008 
1115 i1121° 11132 
1236 «11648 «= 11250 
1355 11366 11369 
48211485 = 11502 
1616 11618 11635 
1749 «11752 «11772 
i985 11904 11906 
2024 12026 12035 
2154 12156 121b2 
2280 12095 12296 
2415 12420 12438 
12556 12558 12575 
2697 12700 12719 
2793 «18794 ~=—:12795 
12840 12845 = 12851] 
13071 13078 13082 
13449 1345413959 
13507 13508 13509 
13748 «13756 = 13757 


a a te + ne ee 






YOUIGIMr-O 
IG WW) 
Ow~aS 
“).£-rocoma@ 
0 b= = 0 bb bp pe 
TUMU0— oo 
MOOWP Ul. co 
ONWO Wu 
‘EfuMMw.0~ 
TE OU) DI DUI OE 
MUW0.0 ~~ ae 
WUIWO £0 o 


Ue J) Le OUI MOUWIVOwW 
Owviw 
TUUTUS— 0 + bo 


£4) OD NM UII TU 
™WO00 G9 GJIC 0 LUT Oo 


WNCW-OwWw 
= - 
OONIO-WwoOowr 
9 0 bb = 8 Bb bb bb 0 bo ho bo bh 


lswWItsfurururorrororn 
4 co 








MAINDEC-11-DERHA 
DERHAB. SRC 


TUTUPOTUPUTUPUTUP 6 8 8 8 = OOOO VIOIOOOOOYIN 
NS LOI OW ONO MU OO + OW I 1 TU 9 
cow 6) ££ © Oe GIT (Oe 10 £00 WG) Oe 0 OW LOI Uo" 


eee 
WWIWOW Le nO O WOT GIIU TO U1 t= MU & TUT 


8-8 MACY11 27(732) 22-SEP-76 15:11 
CROSS REFERENCE TABLE -- PERMANENT SYMBOLS 


9772 9775 «$790 «9781 «49788 = «812 (9813 
gs95 9912 9917, 9934 «= 9939S 
10028 19030 19031 10034 10036 10048 1 
10105 010% “18111 10122 10124 10125 10 
10185 10162 10171 10182 10184 10195 10 
10257 10258 10261 10263 10275 10277 10 
10336 10338 10349 10351 10357 10368 10 
10408 10410 10421 10426 10445 1044— 10 
10483 10505 10508 19509 10513 10515 1 
10583 10584 10587 10580 19601 10603 1 
10643 10655 10659 10578 10679 10683 1 
10735 10737 10738 1o742 10744 10755 1 
10812 10815 10818 10829 10831 10832 1 
O882 10886 10905 10906 19910 10912 1 
10964 10965 10963 10971 10982 10984 1 
11055 11057 11058 1106! 11063 11075 1 
11132 11135 «11138 «1114911151 111521 
11182 11186 «11198 = 112091121; 11822 1 
11288 11289 11292 11294 11306 i1309 1 
11370 «11372 «11383 «11385 «11391 11402 1 
11444 11455 1145811478 «1147911483 
11535 11537 11538 11544 11555 11557 1 
11615 11618 11629 1163: 11632 11635 1 
11705 11708 «611710 «11712 §«6911723 «11725 «1 
11765 11765 11772 11783 11785 1179 1 
11858 11859 11e62 11864 11878 lis7e 1 
11941 11952 11955 11961 11972 11975 1 
12028 12033 12057 12058 12062 12064 1 
12103 12115 12117 12118 eles 12104 1 
12196 12202 12213 12215 12216 12219 1 
12270 «12294 - 12295 12299 12301 e312 1 
e352 12354 «18355 «18359 «12361 «123721 
12434 «12437-12440 «12451 = e453 18454 
12504 12508 12532 12533 12527 e539 
12591 12592 12536 12598 12609 12611 


PAGE 336 


075 8 
21S 82l 
311 8329 


£38 9-655 
s44 959 
979-9984 
32593 


~ 
fon) 


fu 
FL UNIO DOW 30M 


LIM .w0 
WU IMO~31.0 


bb 8 b= bb pe bs pe be po 


M£ocd 


0 bb 0 0 + 0 0 ho oe 
NWU1.00WfO 


0 0b 8 BB 8 bb 0 = = 0s bb be bo po hb hn pe — ~~ 


PUTUPVU MPU PUTU Ue + 6 0 = 8 0 


0+ b= b= b= bb 
) 
— OCOUTIM(O~JOOMm 


SIOOUN £lLIlueHr OO 
IO LOO 


GJ 
ut 


0+ b-= 0 + 8-= b= 8-2 b+ b= b= b+ b= bo 2 bo bo 0 bo 0 he po pe fe 
i=) 

fw 

oo 


fUlUrulUlUlululuslirs—s—-o--+- »-»-- 
rns CuWfue-OO0.0M 
1-310) uw 
| os) Ww 


c 








o-ser= 15:11 PAGE 337 
— BERMANENT SYMBOLS 
é 


MAINDEC-11-DERHAB-A MACY11 277 
DERHAB. SRC CROSS REFERENGE TAB 
e 


12679 2690 12693 12694 12697 12699 12711 12714 15743 1543 1s? 1 16236 12735 = 12794 isso 
1e80l le8l2 12824 le8e8 13131 13140 13141 13154 131 131 13193 1320 13e48 §=6lses8 27, 
13285 13307 13317 13329 13354 13365 13450 13451 13452 19453 13454 13455 13459 13489 13490 
13595 13508 13509 13646 13649 13655 13690 13771 13779 1378] 13843 13849 13850 13851 

‘ 13883 13858 13876 13883 13884 14221 1422 14223 148284 14225 142288 142289 14230 14231 

TRP 3102 3182 357 3684 3765 384e 33e 000 4081 4166 4355 4526 $190 5699 
§031 6452 6890 716 7341 7461 7581 Ol 797 7953 8189 8425 727 9030 9263 
9496 9729 9963 10076 0190 10303 O416 10535 10650 10763 10877 10990 11103 ile? 337 


-LIST 1 1251 le61 1271 1384 rte 1483 1485 1486 1487 1488 1489 1490 1491 492 
1493 1494 1495 1495 1497 310 3123 3139 3157 3182 3208 g222 gees 3237 Je43 
3249 391 3397 3403 3409 3424 3431 3439 3447 3455 3463 3471 3479 3487 3495 
503 3519 3516 3$22 2526 357 2578 3589 3593 3600 3604 3612 3621 3628 3635 
b4e 3650 3656 3684 3701 3765 3781 3842 3859 33¢3 3939 4009 4017 4081 4098 
4166 41 4355 4372 4526 4548 4798 4616 5.30 $210 5609 $630 6031 6052 6452 
6473 6890 6910 7167 7182 7341 7357 7461 7477 7581 7597 7701 7718 7797 7822 
7953 7967 8189 8727 8742 9039 9047 2 
7 9963 9975 10076 10088 10190 10202 10303 10315 1416 10429 OS35 10547 10650 10662 


7508 732 7555 75 7607 7608 7628 7652 7675 7700 7736 7736 7837 7952 97 

7973 7999 8000 049 8188 8214 8215 8235 8236 828 424 452 453 8474 8475 

8587 8725 754 8755 8776 8777 8889 9029 9071 9072 9123 S262 9304 9305 9356 

$495 9537 9538 9589 9728 9771 98ee e 9995 10075 19108 10189 10222 10302 

10335 10415 10450 10534 10567 10649 10682 1076be 10795 10876 10909 10989 11922 11102 11135 

li2i6 «11251 11336 86911369 «612449 | 11482 = 11S62 = 11595) = «13676 = 11709) =: 11790) 39s 11823) = 11903) = 11938 = 12023 

MCALL it ifhaG att leebO )3=1e298- «61e379) = e417 Ss e498 «= 1eS36 = leb16 = eSB le743 13leB 13176 L423 
ve < 

NLIST 1 1251 1261 1271 1384 1391 1483 1485 1486 1487 1488 1489 1490 1491 1492 

1493 1494 1495 1496 1497 3102 3123 3139 3157 3182 3208 3222 3226 3237 3243 

3249 3391 3397 34 3409 3424 3431 3439 S447 3455 3453 S471 34? 487 3495 

3503 3510 J5i6 3522 3526 3572 3578 3589 3593 3600 2604 3612 3621 628 3635 

3642 3650 3655 3684 3701 765 3781 3842 3859 3923 3939 4009 4017 403 O38 

4166 4183 4355 4372 4526 4548 4798 4816 5190 S210 5609 5630 6031 6052 6452 

& 6890 6919 7167 7182 7341 7357 7461 7477 7581 7597 7701 7718 7797 7922 

7953 7967 8189 820 8425 8727 874 9030 9047 3263 9280 9495 9513 9729 

9746 9963 997 10076 10088 10190 10202 10303 10315 10416 10429 105395 10547 10650 10662 

10763 «610775 «6910877 «910889 «86910990 11002 11103 11115 JLlel? 11230 11337 11349 11450) «611462 =: 11583 

11575 11677 11689 11791 11803 11904 11917 200% 12037 e143 12156 leebl lee? 12380 12393 

e195 leSi2 le617 e631 le748 le7Se le7S7? lee? le773 le779) «(12783 «61c800) «61c816 )«=6—leBNG)=Ss«Le8Se 

les7D «§=12874 =612880 )3=6—81e88S)=— 12891 «= 12897 = 13051 38613057 398613064 §3=613068 3861307 13079 »=- 1303 13383 13389 

13400 13406 134le 13416 1342e 13428 13435 13454 13748 13883 13909 13917 139e5 13933 13941 

139498 13957 13965 13973 13981 13989 13997 14005 14013 14021 14029 14037 14045 14053 614213 





K10. 


eh lt hed di 


D ANONO! 000 


9 8essssss 


cates ccaanai Eas aanianictuaie decane 0008000 lll 


OOCOUL00000 OVOO00L0R0 0001 
POOOOSCOL ILL LL leeeeeeeeees3333333334444444444S5S55555556666666666777777777798888888889999999999000000 





